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PREFACE 



This manual is provided for those who need 
to know about the control statements that 
relate to the SCP (system control 
programming) of DOS/VS (Disk Operating 
System/Virtual Storage). The manual 
consists of the following: 

• The sections Initial P rogram Loade r and 
the Jo b Contro l describe these general 
programs of DOS/VS. These sections are 
of interest to anyone using the system, 
including system analysts, programmers, 
and operators. Detailed attention 
routine, job control statement, and job 
control command formats are given. 

• The section POWE R is of interest to 
anyone who wants to decrease the 
execution time of unit record I/O-bound 
jobs. The section fully describes the 
operation of the POWER program. 

• The sections Linka ge Edito r and 
Librar ian are of interest to persons 
responsible for maintaining the resident 
system. These sections fully describe 
the control statements for the linkage 
editor and librarian programs. 



The section Sys teir Buffer Load 
(SYSBUFLD) is of interest to DOS/VS 
users who have an IBM 3211, 3203, or 
5203 Printers attached to their system. 
The section describes the purpose of 
SYSBUFLD and how to use it. 



• Appendix A contains a suirirary of job 
control statements and commands. 



• Appendix B contains a summary of the 
linkage editor. 



* A ppendix C contains a summary of the 
POWER statements and commands. 



Prerequisite publication: 

DOS/VS System Management Guid e , 
GC33-5371 

Related publications are listed in the 
bibliography at the back of this book. 
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INTRODUCTION 



This manual contains descriptions of 
control statements and commands. These 
statements and commands are described in 
detail in the following chapters. 



INITIAL PROGRAM LOADER 

Before a job can be entered into the system 
for execution, the supervisor must be read 
into the supervisor area of real storage 
and the job control program must be loaded 
into the virtual background partition. To 
do this, the operator starts the system by 
following the initial program load (IPL) 
procedure. 



JOB CONTROL 

After the system has been successfully 
started by means of the IPL procedure, it 
is ready to accept input for execution. 
Job control statements are entered via 
SYSRDR, job control commands via SYSLOG. 

Job control runs in any virtual 
partition. It performs its functions 
between jobs and job steps. It is not 
present in the partition while a problem 
program is being executed. 

The term END corresponds to the END key 
on the IBM 3210 and 3215 Console 
Printer-Keyboards (SYSLOG for IBM 
System/370 Models 135 and 145) . 

The term ENTER corresponds to the ENTER 
key on DOC (SYSLOG for IBM System/370 Model 
115 and Model 125). 



LINKAGE EDITOR 

Prior to execution in storage, all programs 
must be placed in a core image library by 
the linkage editor. 

The linkage editor prepares a program 
for execution by editing the output of a 
language translator into core image format. 
The linkage editor also combines separately 
assembled cr compiled program sections or 
subprograms into phases. 



LIBRARIAN 

DOS/VS supports four types of libraries: 

• Cere image library - contains the output 
froir the linkage editor (executable 
program phases) . 

• Relocatable library - contains the 
output cf a language translator (object 
modules) which is used as input to the 
linkage editor. 

• Source statement library - contains 
books (source language statements, macro 
definitions, and pre-edited macro 
definitions) used as input to a language 
translator. 

• Procedure library - stores procedures, 
that is, sets of system control 
statements and (optionally) SYSIPT data. 
The procedures are used to build or 
complete job streams. 



SYSTEM BUFFER LOAD (SYSBUFLD) 



END and ENTER are used as message 
terminators on their respective systems. 
Thus, the term END/ENTER is used in this 
publication in reference to SYSLOG for the 
IBM System/370. 



POWER 



SYSBUFLD is a self-relocating special 
service control processing program for 
DOS/VS users with IBM 3211, 3203, and 5203 
printers. It can be executed as a job or 
job step to load the Forms Control Buffer 
(FCB) and the Universal Character Set 
Euffer (UCE) of the 3211, 3203, and 5203. 



POWER (Priority Output Writers, Execution 
Processors and Input Readers) is a program 
that provides spooling (simultaneous 
Peripheral Operations OnLine) services for 
up to four partitions. It resides in a 
real partition with a priority higher than 
that of the partitions it controls. 
Although POWER runs in real mode, it 
supports both programs running in real and 
virtual mode. 



CONTROL STATEMENT CONVENTIONS 

The conventions used in this publication to 
illustrate control statements are as 
follows: 

1. Uppercase letters and punctuation marks 
(except as described in items 3 through 
5 below) represent information that 
must be coded exactly as shewn. 
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2. 



Lowercase letters and terms represent 
information that must be supplied by 
the programmer. 

Information contained within brackets 
[] represents an option that can be 
included or omitted, depending on the 
requirements of the program. Stacked 
options contained within brackets, for 
example 



H 



represent alternatives, one and only 
one of which may be chosen. 

4. Options contained within braces {} 
represent alternatives, one of which 
must be chosen. 

5. An ellipsis (...) indicates that a 
variable number of items may be 
included. 



6. Underlined elements represent an 

assumed option in the event a parameter 
is omitted. 



In case cf any difference between the 
conventions given in this manual for 
control program functions and these 
appearing in IBM-supplied DOS/VS component 
publications, observe the specific 
restrictions of the component. 



SPECIAL DEVICES 

The following devices that are mentioned 
are not available in the United States of 
America: 

- IBM 1270 Optical Reader/Scrter 

- IBM 1275 Optical Reader/Scrter. 
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INITIAL PROGRAM LOADER 



Operation of DOS/VS is initiated through an 
initial program load (IPL) procedure from 
the resident disk pack. The first record 
on track is read into bytes 0-23 of real 
storage. The information read in consists 
of an IPL PSW and two CCWs , which in turn 
read and load the IPL. 

The wait state is entered, at which time 
the user must indicate which supervisor he 
wants to be loaded. 

Operating in the supervisor state, IPL 
reads the supervisor nucleus into low 
storage. If a read error is sensed while 
reading the supervisor nucleus, the wait 
state is entered and an error code is set 
in the first word of virtual storage. The 
IPL procedure must then be restarted. 

After successfully reading in the 
supervisor nucleus, IPL performs these 
operations: 

• Places the CPU in the EC mode. 

• Sets the LUB table entry for SYSRES to 
point to the PUB entry of the channel 
and unit number of the resident drive. 

• Places the processing unit in the wait 
state with all interruptions enabled. 

(The operator then causes an interrupt, 
which in turn will cause IPL to read its 
commands from the card reader, or from 
the printer-keyboard or DOC -- Display 
Operator Console.) 

• Changes the PUB configuration, if 
indicated, by ADD or DEL commands or 
control cards. 

• Scans the PUB table to determine whether 
or not one or more IBM 3211, 3203, and 
5203 Printers are attached to the 
system. 



where: 

X'cuu' = channel and unit nuirbers. 

k can be specified as either S cr a 
decimal number from to 255: 

S indicates that the device can be 
switched (that is, physically attached 
to two adjacent channels) . The 
designated channel is the lower of the 
two channels. 

to 255 indicates the priority of a 
device that cannot be switched, with 
indicating the highest priority. If k 
is not given, the assumed priority is 
255. 

devicetype = actual device (2400T9, 1443, 
etc.). See type codes in 
Figure 1. 



X'ss' 

X'ssss' 

X'ssssss' 



device specifications (see 
ASSGN Statement) . If absent, 
the following values are 
assigned: 

X'CO* for 9-track tapes 
X'90' for 7-track tapes 
X'00' for nontapes 
X'00', X'01', X'02', and X'03' 
are invalid as X'ss* for 
magnetic tape. 

X'ss* specifies SADxxx (Set 
Address) requirements for IBM 
2702 lines: 

X'00' for SADO 

X'01' for SAD1 

X'02' for SAD2 

X'03' for SAD3 

This information is not 
accepted en the ASSGN 
statements. 



The following describes the IPL commands: 
ADD, CAT, DEL, DPD, and SET. 



ADD Command 

To add a device to the PUB table, a 
command, read by the communication device 
(SYSLOG or SYSRDR) , in the following format 
is required. 



ADD X'cuu' [ (k) ], devicetype 



,X'ss' 
, X'ssss' 
.X* sssss 



, X' ssssss' 



X'ss' is required for 1270, 
1275, 1412, 1419, and 1419P 
device types. It specifies 
the external interrupt bit 
associated with magnetic ink 
or optical character readers. 
The setting X'01' through 
X'20' correspond to the 
external interrupt code in low 
real storage byte 87, bits 7 
through 2 respectively. The 
corresponding external lines 
to which the control units are 
attached are as follows: 
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issued between the SET and DPD statements. 
The CAT command is entered from the card 
reader, the 3210, 3215, or the Display 
Operator Console. The format is: 



CAT 



UNIT=X , cuu" 



The X'ss' parameter specifies 
whether or not the error 
correction feature is present 
on an IBM 1018 Paper Tape 
Punch with 2826 Control Unit 
Model 1. X'ss' can be: 

X'00' no error correction 

feature 
X'01' error correction feature 



For the 3705, X'ss' must be 
specified as one of the 
following: 

X'01' Type 1 channel adapter 
X'02' Type 2 channel adapter. 

For the 2703 of the Model 115 
or 125, X'ss', X'ssss', or 
X'ssssss' is used to specify 
the line mode setting for a 
Start/Stop line or a BSC line. 

The bit settings of the line 
mode specification for each 
line involved are explained in 
IBM System/370 Model 115 
Functional Characteristics , 
GA33-1510, and in IBM 
System/370 Model 125 
Functional Characteristics , 
GA33-1506, respectively. For 
POWER RJE that uses a 278 or 
2770 terminal, you could, for 
instance, specify 

X' 008400* for a non-switched 

line, or 
X'OOCUOO' for a switched line 

between the terminal and your 
Model 115 or 125. 

The line mode setting is not 
accepted on the ASSGN 
statement. If a one or two 
byte value is specified, the 
specified value is right- 
justified- and the rest of the 
three bytes is filled with 
zeros. 

CAT Command 

For VSAM files, the operator can issue the 
CAT command to assign the VSAM catalog 
(logical unit SYSCAT) to a disk. The IPL 
assignment overrides a system generation 
SYSCAT assignment, if one was made, until 
the next IPL procedure. CAT may only be 



where cuu is the channel and unit of the 
disk to be assigned to SYSCAT. 



DEL Command 

To delete a device from the PUB table, a 
command, read by the communication device 
(SYSLOG or SYSRDR) , in the following format 
is required: 



DEL 



X'cuu' 



where cuu is the channel and unit numbers 
of the device to be deleted. 



DPD Command 

The DPD coirman 
The operation 
always be spec 
procedure. Al 
need be specif 
information wa 
generation or 
are desired, 
last command e 
procedure. 



d defines the page data set. 

code of this command must 

ified during the IPL 

1 operands are optional; they 

ied only if the required 

s not supplied during system 

if changes in the definition 

The DPD command must be the 

ntered during the IPL 



DPD 



TYPE= 



•)]!: 



UNIT=X ' CUU ' , CYL=xxx] 
VOLID=xxxxxx] 



The operands of the DPD command may be 
given in any order. 

TYPE TYPE=N indicates that the page data 
set need not be formatted and the 
extent limits have not been changed. 

If TYPE=N is specified but the page 
data set does not exist or the 
extent limits have been changed, 
TYPE=N is ignored and the page data 
set is formatted during IPL. In 
this case, the UNIT and CYL operands 
must either have been supplied 
during system generation, or they 
must be specified in the DPD 
command. 

TYPE=F indicates that the page data 
set is to be formatted during IPL. 
Formatting during IPL is required if 
the page data set is to be extended 
or if it is to be reallocated. 

UNIT UNIT=X'cuu' specifies the channel 

and unit number (in hexadecimal) of 
the device that is to contain the 
page data set. If UNIT is speci- 
fied, CYL must also be specified. 



12 DOS/VS System Control Statements 



Page of GC33-5376-1, revised November 30, 1973, by TNL GN33-8767 



CYL CYL=xxx specifies the sequential 

number of the cylinder, relative to 
zero, where the page data set is to 
begin (in decimal) . (The size of 
the page data set extent is 
calculated by the system.) If CYL 
is specified, UNIT must also be 
specified. 

SYSVIS is the logical unit name of 
the page data set. It is created at 
IPL time from information provided 
by the system generation macro DPD 
and/or the IPL DPD command. The 
user specifies the beginning 
cylinder address and the system 
calculates the size of the disk 
extent which is a function of the 
VSIZE (virtual address area 
specified by the user) specification 
and the disk device type, as 
follows: 

VSIZE 

= number of pages (blocks of 

2 2K bytes). 

r~ t 1 

| Disk Device | Blocks per | 
I Type | Cylinder | 
j. + j 

| 2314 | 60 | 
| 3330 | 114 | 
| 3340 | 36 | 
l 1 J 

The allocation requires full 
cylinders* 

The IBM-supplied supervisor does not 
contain any DPD macro parameters. 
Therefore, when you IPL, you must 
enter all operands of the DPD 
command, including TYPE=F. The 
IBM-supplied supervisor has a VSIZE 
of 128K and consequently one 
cylinder on a 3330 or two cylinders 
on a 2314 or 3340 are required. 



VOLID VOLID=xxxxxx identifies the 

alphameric volume serial number of 
the disk pack that contains the page 
data set. If this operand is 
omitted both during system 
generation and in the DPD command, 
the volume serial number is not 
checked. 



command. The SET command must precede the 
DPD command. The SET command is entered 
via the communications device (3210, 3215, 
Display Operator Console or card reader) 
and is in the following format: 



SET [DATE=valuel,CLOCK=value2] 
f", ZONE= ( EAST ) /hh/irml 
L \WESTJ J 

valuel - Specifies the year, month, and 
day of the month in one of the 
following formats (depending on 
the installation's standard 
established during system 
generation) : 

mm/dd/yy 
dd/mm/yy 

value2 - Specifies the local time-of-day 
in the format hh/irm/ss. 

EAST - Specifies that the installation 
is located at a geographical 
position east of Greenwich. 

WEST - Specifies that the installation 
is located at a geographical 
position west of Greenwich. 

hh/mm - A decimal value which indicates 
the difference in hours and 
minutes between lccal time and 
Greenwich Mean Time. hh may be 
in the range 0-12, mm in the 
range 0-59. 



The parameters that have to be specified 
with the SET command depend upon the type 
cf system and the type of communications 
device used. The following groups can be 
distinguished: 



1. 



If the TOD clock is in the set state, 
the command may be given in one of the 
four possible forms: 



SET 

SET ZONE= 
SET DATE= 
SET DATE= 



,CLOCK= 
,CLOCK= 



,ZONE= 



2. 



If the TOD clock is in the not-set 
state, the command must be given in 
either of two forms: 



SET Command 



SET DATE= 
SET DATE= 



,CLOCK= 
,CLOCK= 



,ZONE= 



Besides the DPD command, the only 
communication required at IPL time is the 
SET command. If any ADD or DEL commands 
are required, they must precede the SET 



3. If the TOD clock is inoperative, the 
command must be given in the form: 

SET DATE= ,CLOCK= 
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Notes: 



4. 



parameters. 



1. 3210/3215/DOC. 



If the TOD clock is in the set state, 
message 01 301 is printed. If the TOD 
clock, is in the not-set state, message 
0I31A is printed. If the TOD clock is 
inoperative, messages 0I32I and 0I31A 
are printed. 



Card Reader. 



No messages are given. 



Although, when the TOD clock is in the 
set state, no parameters need to be 
specified with the SET command, it is 
strongly recommended to do so, for 
reasons of error recovery. 

5. The date and time-of-day supplied in 
the SET command for systems that have 
TOD clock support should be realistic 
values, that is, the difference between 
local time and GMT may net be more than 
twelve hours, hh may not be more than 
12, and mm may not be more than 59. 
The time-of-day clock should always 
contain the exact time (that is the 
time that has elapsed since January 1, 
1900, 00.00 a.m.). 



3« CLOCK parameter. 

When using the CLOCK parameter of the 
SET command, the time-of-day security 
switch must be depressed to the ENABLE 
SET position. 



DEVICES 

Figure 1 lists the device types available 
with DOS/VS. This figure shews the device 
type codes to be used in ADD commands when 
adding devices to the system. 
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r t 

Device 

Type 

Codes 



Actual IBM Device 



Device Type 



2400T9 
2400T7 
3410T9 
3410T7 
3420T9 
3420T7 



9-track Magnetic Tape units (2400-series) 

7-track Magnetic Tape Units (2400-series) 

9-track Magnetic Tape Units (3400-series) 

9-track Magnetic Tape Units (3400-series) 

9-track Magnetic Tape Units (3400-series) 

7-track Magnetic Tape Units (3400-series) 



Magnetic Tape Devices 



2495TC 

1442N1 

2520B1 

2596 

3525RP 

2560 
5425 



2495 Tape Cartridge Reader 
1442N1 Card Read Punch 
2520B1 Card Read Punch 
2596 Card Read Punch 
3525 Card Read Punch 

(with optional read feature) 
2560 Multifunction Card Machine 
5425 Multifunction Card Unit 



Tape Cartridge Reader 
Card Read Punches 



-+- 



2501 
2540R 
3504 
3505 



2501 Card Reader 

2540 Card Reader 

3504 Card Reader 

3505 Card Reader 



Card Readers 



2540P 

2520B2 

1442N2 

2520E3 

3525P 



2540Card Punch 
2520E2 Card Punch 
1442N2 Card Punch 
2520B3 Card Punch 
3525 Card Punch 



Card Punches 



1403 

1403U 

1443 

3211 

5203 

5203U 

3203 

3525P 



1403 Printer 

1403 Printer with UCS feature 

1443 Printer 

3211 Printer 

5203 Printer 

5203 Printer with UCS feature 

3203 Printer 

3525 Card Punch (with optional print feature) 



Printers 



1050A 



+- 



3210, 3215 Console Printer-Keyboards 



Printer-Keyboards 



125D 
125DP 



Model 125 Integrated Display Operator Console 
Model 125 Integrated Display Operator Console 
with optional Console Printer 



Display Units 



UNSP 
UNSPB 



Unsupported Device 
Unsupported Device 



No burst mode on irultiplexer channel 
Burst mode on multiplexer channel 



2311 
2314 
2314 
3330 
3340R 



3340 



2321 



2311 Disk Drive 

2314 Direct Access storage Facility 

2319 Disk Storage Facility 

3330-1, 3330-2, or 3333-1 Disk Storage 

3340 Disk storage with Disconnect Command 

Chaining (DCC) feature (with or without 

3340 Data Module, Model 35 or 70) 
3340 Disk Storage without DCC feature (with 

or without 3340 Data Module, Model 35 

or 70) 
2321 Data Cell Drive 



DASE 



Figure 1. Device Type Codes (Part 1 of 2) 
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r t 

Device 

Type 

Codes 



Actual IBM Device 



Device Type 



3540 



3540 Diskette Input/Output Unit 



Diskette Input/Output Units 



1419 

1419 

1419 

1419P 

1419S 



1255 Magnetic Character Reader 

1259 Magnetic Character Reader 

1419 Magnetic Character Reader 

1419 Dual Address Adapter Primary Control Unit 

1419 Dual Address Adapter 

Secondary Control Unit 



MICR-Magnetic Ink Character 
Recognition Devices 



-+ 



2701 
2702 
2703 
2955 



2701 Line Adapter Unit 

2702 Transmission Control Unit 

2703 Transmission Control Unit 
2953 Data Adapter Unit 



Teleprocessing Lines 
Data Link for RETAIN 



-+ 



1017 
1017TP 
2671 
1018 



1017 Paper Tape Reader with 2826 Control Unit 

Model 1 

1017 Paper Tape Reader with 2826 Control Unit 

Model 2 

2671 Paper Tape Reader 



Paper Tape Readers 



-+ 



1018TP 



1018 Paper Tape Punch with 2826 Control Unit 

Model 1 
1018 Paper Tape Punch with 2826 Control Unit 

Model 2 



Paper Tape Punches 



1419 

1419P 

1287 

1288 

3881 

3886 



1270 Optical Reader Sorter 
1275 Optical Reader Sorter 

1287 Optical Reader 

1288 Optical Page Reader 
3881 Optical Mark Reader 
3886 Optical Character Reader 



Optical Readers 



2260 
3270 
3705 
3277 
3277B 



2260 Display Station or 1053 Printer 
3270 Information Display System 
3705 communications Controller 
3277 Display Station or Printer 
3277 Display Station or Printer running in 
burst mode on the MPX channel 



Display Station 



I- -+ 

J7770 | 7770 

L 1 



Audio Response Unit 



Audio Response Units 



Figure 1. Device Type Codes (Part 2 of 2) 
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JOB CONTROL 



> 



This chapter contains descriptions, 
formats, and usages of the job control 
commands and statements, and attention 
routine commands, which are identified as 
follows: 

job control statement - JCS 

job control command - JCC 

attention routines - AR 



Figure 2 contains the commands and 
statements grouped by function, and also 
indicates the programs or routines for 
which they are valid. An alphabetical 
overview of all statements and commands is 
given in A ppe ndix A. 



FORMATTING STATEMENTS AND COMMANDS 



JOB CONTROL STATEMENTS 



Job control statements conform to the 
general rules for formatting DOS/VS control 
statements. 



Name. Two slashes (//) identify the 
statement as a control statement. They 
must be in columns 1 and 2. At least 
one blank must immediately follow the 
second slash. Exception: The 
end-of-job statement contains /& in 
columns 1 and 2, the end-of -data-file 
statement contains /* in columns 1 and 
2, the end-of -procedure statement 
contains /+ , in columns 1 and 2, and the 
comment statement contains * in column 1 
and blank in column 2. 



Operatio n. Describes the operation to 
be performed. It can be up to eight 
characters long. At least one blank 
follows its last character. 



Operan d. May be blank or may contain 
one or more entries separated by commas. 
The last term must be followed by a 
blank, unless its last character is in 
column 71. Any blank within the operand 
fields, except for fields contained 
within apostrophes, is considered an 
end-of -operand indication. No further 
processing of that card occurs. 



Type of Command 
or Statement 

Job Identification 



Oper- 
ation 

JOB 
/& 
/ + 



File Definition 



Pass Information 
tc Operator 



Pass Information 
to Program 



Job Stream Control 



Setting System 
Parameters 



Operator 
Communications 



T 1 

Valid for 



r t 

JCS | AR|JCC 

+ — + — + — ^ 

X 
X 
X 



DLAE 

DLBL 

EXTENT 

TLBL 

TPLAE 

VOL 

XTENT 

/* 



DATE 

LBLTYP 

OPTION 

OVEND 

UPSI 



BATCH 

CANCEL 

PAUSE 

PRTY 

START 

STOP 

UNBATCH 



ALLOC 
ALLOCR 

SET 



ALTER 

DSPLY 

DUMP 

END or 

ENTER key 

ENDSD 

IGNORE 

LOG 

MSG 

MODE 

NEWVOL 

NOLOG 

ZONE 



X 

Nl 



Nl Valid only in a foreground partition. 



Figure 2. JCS, JCC, and AR ty Function 
(Part 1 of 2) 
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r~ 


T ~ _ 

1 


" T ~ ~ ~ T 

| valid for| 


| Type of Command 


| Oper- 


i- — t — t — * 


| or Statement 


| ation 


|JCS| AR|JCC| 


L 


j _ _. 


X_ j. j j 


r 


— I — — 


1 T 1 1 


| Control of I/O 


|ASSGN 


1 x | I x | 


| System 


| CLOSE 


1 x | I x | 




| DVCDN 


1 1 1 x 1 




| DVCUP 


1 1 1 x 1 




|HOLD 


1 1 1 x 1 




ILISTIO 


1 x 1 1 x 1 




|MAP 


1 1 x j X | 




|MTC 


1 x | I x | 




| RESET 


1 x | I x | 




|ROD 


1 1 1 x | 


| Execution of 


|UCS 
|EXEC 


1 1 1 x | 
-+ — + +— H 

1 X | | X j 


| Program 


| RSTRT 


1 x | | | 



L X X X X J 

Figure 2. JCS, JCC, and AR by Function 
(Part 2 of 2) 



JOB CONTROL AND ATTENTION COMMANDS 

Job control commands and attention commands | 
contain the operation code, at least one 
blank and then the specified parameters. 
The parameters are separated by commas. 
The operation code usually begins in column 
1 of the command, but this is not required. 



In contrast to job control statements 
(JCS) , which are normally entered by the 
programmer, commands (job control and 
attention) are normally entered by the 
operator. 

Job control commands (JCC) are issued 
between jobs or job steps and are 
entered through SYSRDR or SYSLOG. (Job 
control statements, on the other hand, 
are usually coded as part of the input 
stream and are entered through SYSRDR.) 

Attention commands (AR) can be issued at 
any time by pressing the request key on 
SYSLOG. Some of these commands can be 
issued only in a multiprogramming 
environment. 



JOB CONTROL STATEMENTS SUMMARY 



All job control statements are essentially 
free form. Information starts in column 1 
and cannot extend past column 71. 
Continuation cards are not recognized by 
job control. For the exception to this 
rule, see the descriptions of the DLAB, 
DLBL, and TPLAB statements . 



Job control normally reads from the 
device identified by the symbolic name 
SYSRDR. However, job control statements 
can also be entered through SYSLCG, or they 
may be retrieved from the procedure 
library, where they were previously 
cataloged. A brief description of the job 
control statements fellows. 



t 1 

| Used at execution time to assign 
| a specific device address to the 
| symbolic unit name used. 
| Closes either a system cr a 
| programmer logical unit assigned 
| tc tape, disk, cr diskette, 
j Contains a date that is put in 
j the communications region. 
|Ccntains file label information 
jfer DASD or diskette label 
| checking and creation. 
| Indicates the end of jot control 
j statements for a job step and 
| that a cataloged procedure is to 
| be retrieved before a job step is 
| executed. 

| Defines each area, or extent, of 
| a DASD file cr diskette volume. 
| Indicates the beginning of 
|ccntrol information for a job. 
| Defines the amount of storage to 
| be reserved at link-edit time for 
| processing tape and nonsequential 
| DASD file labels in the 
| partition. 

| Used to get a listing of I/O 
| assignments. Ignored by job 
|ccntrol if SYSLST is not 
| assigned. 

| Controls operations on logical 
junits to IBM 2400/3400 series 
| magnetic tapes. 

| Specifies one or more of the job 
| control options. 

(Indicates that no mere overwrite 
| statements will follow for the 
| respective procedure. 
| Causes a pause immediately after 
| processing this statement. 
| Resets I/O assignments to the 
| standard assignments . 
j Restarts a checkpointed program. 
| Contains file label information 
| f cr tape label checking and 
| writing. 

| (User Program Switch Indicators) 
| Allows the user to set program 
j switches that can be tested. 
(Initializes the zone field in the| 
| communications region. 
(Indicates the end of a data file 
| or the end of a job step. 
(Indicates the end of a job. 
| Job control comments. 
(Indicates the end of a procedure. 
i x . J 



ASSGN 

(CLOSE 

| DATE 
| DLBL 1 

I EXEC 

EXTENT *- 

JOB 

LBLTYP 

LISTIO 

|MTC 

| OPTION 
|OVEND 

PAUSE 

RESET 

| RSTRT 
TLBL 1 

IUPSI 

ZONE 

(/* 

I/& 
* 

/ + 



( 



18 DOS/VS System Control Statements 



Page of GC33-5376-1, revised November 30, 1973, by TNL GN33-8767 



r 1 

Programming support continues for the 
following job control statements provided 
in previous versions of the systeir. 



DLAB 1 - 



TPLAB a 



VOL 3 



XTENT- 



Contains file label information 

for DASD label checking and 

creation. 

Contains file label information 

for tape label checking and 

writing. 

Used when a set of label 

information for magnetic tape 

file or a DASD file is specified. 

It is not required with the 

current DLBL, EXTENT, or TLBL 

statements. 

Defines each area, or extent, of 

a DASD file. It is used in 

conjunction with the VOL and DLAB 

statements. 



The combination of DLAB, VOL, and XTENT 
statements should not be used tc supply 
the extent and label information for 
the IBM 3330, 3333, and 3340. To 
supply this information, use the DLBL 
and EXTENT statements. 

The combination of VOL and TPLAB 
statements contains file label 
information for tape label checking and 
writing. These two statements can be 
replaced by the TLBL statement. 



Any job control statement other than these 
is recognized as an error. A message is 
issued so that the programmer or operator 
can correct the statement in error. Some 
of the errors recognized are: 

• Invalid symbolic unit name. 

• No space reserved in LUB table for a 
symbolic unit. 

• Invalid device type. 

• Invalid length of field. 

• Invalid character. 

• Missing /£ statement. 

• A volume (VOL) statement does not 
precede a label (DLAB or TPLAB) 
statement. 

• An EXTENT statement does not 
immediately follow its associated DASD 
label (DLBL) statement. 



Whenever an invalid statement is 
indicated, the statement must be reissued 
to be effective. For example, if an 



OPTION LINK is encountered without a 
SYSLNK assignment, the OPTION statement 
must be reentered after assigning SYSLNK. 

SEQUENCE OF JCS AND JCC 

The job control statements fcr a specific 
job always begin with a JOB statement and 
en 5 with a /£ (end-of-job) statement. A 
specific job consists cf one or irore job 
steps. Each job step is initiated by an 
EXEC statement. Preceding the EXEC 
statement are any job control statements 
necessary to prepare fcr the execution of 
the specific job step. The only 
limitation on the sequence of statements 
preceding the EXEC statement is that DLBL 
statements must immediately precede the 
corresponding EXTENT statements. If the 
DLBL and EXTENT statements fcr a private 
core image library are in the input stream 
(if the information is net contained on 
the label cylinder) , they must precede the 
ASSGN SYSCLB statement. 

The LBLTYP statement is used at 
link-edit time and must precede the 
// EXEC LNKEDT statement; for 
self-relocating programs, however, it is 
submitted immediately preceding the 
// EXEC statement for the program. 



INDIVIDUAL FORMATS (JCS, JCC, AR) 



Detailed descriptions cf the formats and 
functions of individual JCS, JCC, and AR 
statements and commands fcllcw in 
alphabetic sequence. If the JCC and AR 
formats coincide, this is indicated by a 
combined heading, JCC and AR Format. 



JOB CONTROL STATEMENTS AND COMMANDS 



ALLOC 

The ALLOC command (Allocate Virtual 
Address Area) permits the operator to 
allocate address space in the virtual 
address area (not already allocated to the 
shared virtual area) to foreground 
partitions. The number cf bytes to be 
allocated for a foreground partition is 
specified in 2K (2048 bytes) increments. 

Not e: ALLOC cannot be specified fcr a 
single-partition system. 

JCC and AR Format 

ALLOC Fl=nK[,F2=nK] [,F3=nK] [,F4=nK] 

The order cf operands is arbitrary. At 
least one operand must be specified. The 
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specified number is equal to the number of 
foreground partitions. 

The value n should be an even integer, 
n must not be smaller than 64 for an 
active foreground partition. Any 
specification smaller than 64 is flagged 
and must be corrected; any uneven 
specification greater than 64 is rcunded 
up to the nearest even integer. 

Note also that the size of the shared 
virtual area (SVA) must be taken into 
account. (Refer to the SET command for 
more details.) If VSAM is to be executed 
from the SVA, a GETVIS area of 
approximately 30K is required in the 
partition. If VSAM is to be executed in 
the partition, a GETVIS area of 
approximately 200K is required in that 
partition. 

The following considerations apply to 
storage allocation among foreground and 
background programs that run in virtual 
mode: 



2. 



Allocation of virtual 
starts at the address 
preceding the SVA, whi 
high end of the virtua 
The areas are always c 
no gaps between the al 
partitions. If the si 
more partitions is cha 
boundaries of the rema 
partition (s) are moved 



partitions 
immediately 
ch is at the 
1 address area, 
ontiguous, with 
located 
ze of one or 
nged, the 
ining 
accordingly. 



The size of the virtual background 
partition is not allocated or changed 
explicitly, but is changed implicitly 
by allocating or changing the size of 
one or more virtual foreground 
partitions. Storage neither allocated 
to the virtual foreground partitions 
nor to the shared virtual area 
automatically belongs to the virtual 
background. The virtual background 
must always have at least 64K bytes. 
The partition can be stopped by the 
STOP command, but not unbatched by the 
UNBATCH command. 



3. The size of the virtual foreground 

partitions must always be allocated or 
changed explicitly. The size of an 
unspecified virtual foreground 
partition is not changed. When 
changing the size of one or more 
virtual foreground partitions, the 
starting and/or end addresses of the 
remaining partition (s) change 
accordingly. The ALLOC command must 
therefore be used with care with 
regard to programs which are linked to 
specific load addresses and which 
cannot be relocated. 



4. To delete a virtual foreground 
partition from the system, you must 
issue an ALLOC command specifying a 
size of OK for the respective 
partition. Only an inactive partition 
can be deleted. A foreground 
partition is inactive if it has been 
unbatched (by the UNEATCH Command) or 
if it has never been activated (by the 
BATCH or START command) . 

5. The maximum permissible size of the 
virtual background partition is the 
size of the virtual address area minus 
the size of the SVA specified for the 
system. The maximum size allowed for 
a virtual foreground partition is the 
size of the virtual address area minus 
64K for the virtual background and 
minus 64K for the SVA. 

6. No allocation takes place when the 
ALLOC command would move the start 
address of a virtual partition upwards 
and/or the end address downwards while 
a program is running in that 
partition. 

Exception: The end address of the 
partition in which jcb ccntrcl is 
processing an ALLOC command may be 
moved downwards so that a partition of 
64K remains. 

If the rules listed are violated, 
corresponding error messages (lPOnD or 
ISOnD) are issued, indicating that the 
ALLOC command was rejected and that a 
correct command has to be entered. 



ALLOCR 



The ALLOCR command (Allocate Real Storage) 
permits the operator tc allocate the real 
address area among foreground and 
background programs, that is, to allocate 
real partitions. The number of bytes to 
be allocated is specified in 2K 
increments. 

Not e: ALLOCR cannot be specified for a 
single-partition system. 



JCC and AR Fo rmat 

ALLOCR BGR=nK[,FlR=nK] [,F2R=nK] 
[,F3R=nK] [,F4R=nK3 

The order cf operands is arbitrary; at 
least one operand must be specified. The 
maximum number of operands is equal to the 
number of partitions specified during 
system generation in the NPARTS parameter 
of the SUPVR macro. 
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n must be an even integer. It iray also 
be zero. 

The following considerations apply to 
storage allocation in the real address 
area: 

1. Allocation starts at the end of the 
supervisor. The areas are always 
contiguous, with no gaps between the 
allocated partitions. The main page 
pool is at the high end of the real 
address area. If the size of one or 
more real partitions is changed, the 
boundaries of the remaining 
partition(s) are moved accordingly. 
For this reason the ALLOCR comrand 
must be handled with care with regard 
to programs that are linked to 
specific load addresses in real 
storage and which cannot be relocated. 

Note: The maximum size of the real 
address area which can be allocated by 
the ALLOCR command is the area 
specified by the RSIZE parameter of 
the VSTAB macro at system generation 
(minus the size of the supervisor) or 
the real storage available in the 
hardware system being used, (minus the 
size of the supervisor), whichever is 
smaller. 

2. The size of the page pool is net 
allocated or changed explicitly but is 
changed implicitly by allocating or 
changing the size of one or more real 
partitions. Storage not allocated to 
real partitions and not occupied by 
the supervisor belongs automatically 
to the main page pool. 

The minimum size of the main page pool 
is: 

• 18K minus the size of the sirallest 
real partition if the smallest real 
partition is 18K or less and 
PFIX=NO (plus 2K if AP=YES). If 
the SDL (system directory list) is 
active, however, the main page pool 
must be at least UK. 

• 18K if PFIX=YES (plus 2K if 
AP=YES) . 

• 18K if phases from the SVA are to 
be executed. 

3. The size of each real partition must 
always be allocated or changed 
explicitly (including that of the real 
background partition) . The size of an 
unspecified real partition is not 
changed. 

The size of each real partition may be 
changed arbitrarily; it may even be 



reduced to zero. Depending on the 
changes made, however, the boundaries 
of adjacent partitions change. 

The size of an active real partition 
can be reduced only via the ALLOCR job 
control command. When a real 
partition is inactive, either the 
ALLOCR job control command or the 
ALLOCR attention command may be used. 

The background partition is always 
active. A foreground partition is 
inactive if it has been unbatched (by 
the UNEATCH command) cr if it has 
never been batched (by the BATCH or 
START command) . Otherwise it is 
active. When a partition is 
increased, either the size of another 
partition or the main page pool is 
decreased. A partition can be 
decreased only if it is inactive. 

4. A program running in a virtual 
partition may fix pages (via the PFIX 
assembler macro) only if the attached 
real partition in a multi-partition 
system has a size greater than zero. 
It may fix as many pages as the real 
partition contains page frames. 

In a single-partition system, a 
program running in virtual mode may 
fix all pages with the exception of 
the 18K required for the minimum main 
page pool. 

5. Real storage is not allocated when an 
ALLOCR command would move the start 
address of a real partition upwards 
and/or the end address downwards while 
a program is running in that 
partition, or when the real partition 
belongs to a virtual partition in 
which a program running in virtual 
mode may fix pages. 

Exception: The size of a real 
partition in whose attached virtual 
partition job control is processing an 
ALLOCR command may be changed 
arbitrarily; it may even be reduced to 
zero. 

If the rules listed are violated, 
corresponding error messages (lPOnD or 
ISOnD) are issued, indicating that the 
ALLOCR command was rejected and that a 
correct command has to be entered. 

ALTER 

The ALTER command allows the operator to 
alter 1 to 16 bytes of virtual storage, 
starting at the specified hexadecimal 
address. After the command has been 
entered and the END/ENTER key pressed, the 
hexadecimal representation of the 
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information to be placed in storage should 
be entered on the device assigned to 
SYSLOG. Two hexadecimal characters (0 
through F) must be entered for each byte 
to be changed. If an odd number of 
characters is entered, the last character 
is ignored and its associated byte is 
unaltered. 

AR Format 

ALTER address 

address The six-digit hexadecimal 

address, with leading zeros if 
necessary, to start storage 
alteration. 

If the specified address is 
within the supervisor area or the 
shared virtual area (SVA) , a 
message is issued and the 
operator has the option to cancel 
or to change the address. 



If the specified address is 
within an invalid address range, 
the command is ignored and a 
corresponding inforrratory message 
issued. 



If the 16 bytes to be altered 
cross the boundary from a valid 
to an invalid address space, only 
the bytes of the valid address 
space are altered and a 
corresponding inforrratory message 
is issued. 



ASSGN 



The ASSGN command or statement (Assign 
Logical Name) assigns a logical I/O unit 
to a physical device. Only DASD can be 
assigned to (shared by) rrore than one 
partition concurrently. 



The general format for the ASSGN statement/command is as follows: 



T 



Name 


| Operation 
x 


j Operand 
. j. 


1 


1 

| Operand 2 
j j 


Other Operands 

l 


(Optional) 




— t 


t — 




— t — 


l _ _ _ — 




// 


| ASSGN 


|SYSxxx, 




|X*cuu' 

j (address-list) 


,TEMP 
,PERM 




(blank 








|UA 


,VOL=volserno 




for 








|IGN 


,SHR 




JCC) 








|SYSyyy 

| device-class 

| device-type 

1 


^'ss* 

,ALT 

,H1 

,H2 





l X X X X J 

The operands of the ASSGN card can be combined in various ways. The format is therefore 
broken down into groups: 

• For any device 

• For disks 

• For diskettes 

• For tapes 

• For printers 

• For card (read) punches 

• For card readers. 

The operands are processed in the sequence given for each combination. 



For_any_deyice 

[//] ASSGN SYSxxx,|X'cuu' 

(address-list) 
jSYSyyy 

lUA 
iIGN 



T,TEMPl 

LpermJ 
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F or d isks 

[//] ASSGN SYSxxx,] 



X'cuu' 

(address 

SYSyyy 

DISK 

2311 

2314 

3330 

3340 



\ [", TEMPI [ f VOL=volserno] [ ,SHR] 
-list)) |_,permJ 



For disket te s 

[//] ASSGN SYSXXX, [ X'CUU' 

(address 
SYSyyy 

I DISKETTE 
3540 



) (" # TEMP"| 

-list)[L,: 



PERM J 



For tapes 

[//] ASSGN SYSXXX, 



For printers 

[//] ASSGN SYSxxx,/ 



X'cuu' 

(address-list) 

SYSyyy 

TAPE 

2400T7 

2400T9 

3410T7 

3410T9 

3420T7 

3420T9 



X'cuu* 
(address-list) 
SYSyyy 
PRINTER 
1403 
1403U 
1443 
3203 
3211 
5203 
'5203U 



|~, X'ss'l r,TEMP][,VOL=volserno] 
L,ALT J Lt PERM J 



[,TEMP] 

L,permJ 



For card (read) punches 



t//3 ASSGN SYSxxx, 



/ (a 



CUU' 

(address-list) 1 

SYSyyy 

PUNCH 

1442N1 

1442N2 

2520B1 

2520B2 

2520B3 

2540P 

2560 



|",TEMP] 

L,permJ 



2596 
3525P 
3525RP 
5425 



fej 



UH2J 
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For card readers 



[//] ASSGN SYSxxx,, 



X'cuu' 

(address-list) 

SYSyyy 

READER 

1442N1 

2501 

2520B1 

2540R 

256( 



T,TEMP] 
[, PERM J 



L,H2j 



2596 

3504 

3505 

3525RP 

5425 



LH2J 



The job control statement (// ASSGN) is 
temporary. It remains in effect only until 
the next change in assignment or until the 
end of job, whichever occurs first. The 
job control command (ASSGN) is permanent. 
It remains in effect until the next 
perm nent assignment, the DVCDN command, or 
re-IPi. of the system, whichever occurs 
first. A CLOSE command to a system logical 
unit on disk or the 3540 diskette also 
removes a permanent assignment. See also 
the TEMP override of a permanent ASSGN and 
the PERM override of a temporary ASSGN. 

At the completion of a job, a temporary 
assignment is automatically restored to the 
permanent assignment for the logical unit. 

The entries in the operand field 
represent the following. 

SYSxxx The symbolic unit name. It can be 
one of the following. (After 
supervisor generation, SYSCAT can 
only be assigned by the CAT 
command at IPL time.) 

SYSRDR 

SYSIPT 

SYSIN 

SYSPCH 

SYSLST 

SYSOUT S 2 

SYSLNK 

SYSLOG 

SYSSLB 

SYSRLB 

SYSREC 

SYSCLB *-, 3 

SYSnnn represents all the other 
symbolic units in the 
system. These units vary 
from SYS000 to SYSmax, 
where SYSmax represents the 
highest numbered programmer 
logical unit available for 
the system. SYSmax is 
equal to 255 minus (number 



of partitions multiplied by 
14). Each of these 
programmer logical units 
can be assigned to any 
partition without a 
prescribed sequence, except 
when using DAM. For a 
given partition, the 
maximum number of 
programmer logical units is 
equal to SYSmax minus the 
sum cf all programmer 
logical units assigned to 
other partitions. 



Notes : 



1. Must be permanent assignments, 
for example, the TEMP option 
is not permitted for assigning 
these logical units. 

2. Valid for a tape unit only. 

3. Only if the system permits 
private core image libraries. 

If a system logical unit is 
assigned to a tape, DASD, or 3540 
diskette, the unit should be 
closed (using the CLOSE command) 
before it can be reassigned. 

When SYSOUT is assigned, the 
magnetic tape device must not be 
the permanent assignment of either 
SYSLST or SYSPCH. Before 
assigning a tape drive to a system 
output unit (SYSOUT, SYSLST, 
SYSPCH) , all previous assignments 
of this tape drive to any system 
input units and to any programmer 
units (input or output) must be 
permanently unassigned. It is not 
possible to change the assignment 
of SYSLOG while a foreground 
partition is active. 
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If SYSLNK is assigned to a 
foreground partition (s) , SYSCLB 
must also be assigned to the same 
partition (s) . Whenever the DLBL 
and EXTENT information for SYSCLB 
changes, SYSCLB must be 
reassigned. 



X'cuu* Indicates the channel and unit 
number (in hexadecimal) . 

c = to 6 for the channel 

uu= 00 to FE (0 to 254) in 
hexadecimal 

(address-list) 

You can specify a list of up to 
seven device addresses in the form 
X'cuu', separated by commas and 
enclosed in parentheses. In this 
case the system searches only the 
PUB entries referenced in the 
address list for a free unit, 
starting with the first specified 
device address. Once a free unit 
is found, it is assigned to SYSxxx 
for the job in which the 
assignment is made. For disks, if 
SHR is specified, the first unit 
in the list is assigned, even if 
previously assigned. 

UA Indicates that the logical unit is 
to be unassigned. Any operation 
attempted on an unassigned device 
cancels the job. 

IGN For certain American National 

Standard and DOS/VS COBOL problem 
programs (for sequential input 
files), and for FORTRAN and RPG 
II, the IGN option unassigns the 
specified logical unit, and 
ignores any subsequent logical 
IOCS command (OPEN, GET, etc.), 
issued for that unit. 

This allows you to disable a 
logical unit that is used in a 
program without removing the code 
for that unit. You can then 
execute the program as if the unit 
did not exist. This may be 
especially helpful when debugging 
a program. 

For assembler language problem 
programs, IGN indicates that the 
logical unit is to be ignored. 
With files processed by logical 
IOCS, the OPEN to the file is 
ignored, the DTF table is not 
initialized (for example, IOREG, 
extent limits) , and the IGNORE 
indicator is set on in the DTF 
table. It is your responsibility 



to check this indicator and bypass 
any I/O commands (GET, PUT, etc) 
for this file. 

The IGN option is net valid for 
SYSRDR, SYSIPT, SYSIN, and SYSCLB, 
nor for PL/I programs. The IGN 
option can be made temporary by 
specifying the TEMP option. 



Additional information about 

ignore is in the OPEN (10 section 

of DOS/VS Supervisor and I/O 
Macros, GC33-5373. IGN 
restrictions for American National 
Standard and DOS/VS COBOL users 
are given in the associated 
Program Product publications for 
the processor being used. 

SYSyyy This may be any system or 

programmer logical unit as shown 
earlier under the description of 
SYSxxx. In this case, SYSxxx is 
assigned to the same device to 
which SYSyyy is assigned. This 
type of specification is 
particularly helpful in the case 
of disk, because the specification 
of SYSxxx, SYSyyy is considerably 
shorter than the full 
specification. 

Example: 

// ASSGN SYS001, 2314, PERM, 

VOL=RAFT01,SHR 
// ASSGN SYS003,SYS001 
// ASSGN SYSLNK,SYS001 

device-class 

In this case the specification of 
READER, PRINTER, PUNCH, TAPE, 
DISK, or DISKETTE is allowed. The 
system searches the PUB tables for 
the first unassigned unit of the 
specified device-class and assigns 
it to SYSxxx. This type of 
specification might be used if the 
exact configuration of the 
installation is not known or not 
important. For disks, if SHR is 
specified, the first unit of the 
specified device class is 
assigned, even if previously 
assigned. 

The specific device types to which 
each device class applies are 
listed below. 

READE R 1442N1, 2501, 2520B1, 

2540R, 2560, 2596, 3504, 
3505, 3525RP, 5425 

PRINTER 1403, 1403U, 1443, 3203, 
3211, 5203, 5203U 
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PUNCH 1442N1, 1442N2, 2520B1, 
2520B2, 2520B3, 2540P, 
2560, 2596, 3525P, 
3525RP, 5a25 

TAPE 2400T7, 2400T9, 3410T7, 
3410T9, 3420T7, 3420T9 

DISK 2311, 2314/2319, 

3330/3333, 3340, 3340R 



DISKETTE 3540 

device-type 

This can be the 
supported device 
2400T9 or 3525RP 
the PUB table of 
device-type is s 
first free unit, 
is found, it is 
SYSxxx. use thi 
you are interest 
specific type of 
in the physical 
if SHR is specif 
unit of the spec 
is assigned, eve 
assigned. 



device code of any 
-type, such as 
In this case 

the specified 
earched for the 

When a free unit 
assigned to 
s specification if 
ed only in the 

device, and not 
unit. For disks, 
ied, the first 
ified device-type 
n if previously 



Figure 3 shows an example of how 
the PUB table is scanned with 
different types of tape 
specifications in the ASSGN 
statement/command . 
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Search 
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Specification 
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| 380 |3410T9| 
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j 381 |3410T9| 


9 1 
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| 382 J3420T91 


10 | 










| 383 |3420T9| 


11 | 











I X X X X J 

Figure 3. How the PUB Table is Scanned 

X'ss' Device specifications (used to 

specify mode settings for 7-track 
and 9-track magnetic tapes) . If 
X'ss* is not specified at system 
generation time or at IPL time, 
the system assumes x'90' for 
7-track tapes and X'CO* for 
9-track tapes, except for the 3420 
for which X'DO* is assumed, 
specifying the maximum byte 



density for the device. CO is the 
normal reset mode fcr a 9-track 
tape unit and specifies the 
maximum byte density for that 
device. C8 is an alternate mode 
setting for 9-track dual density 
tapes only. For 800 BPI single 
density 9-track tape, a specifica- 
tion of C8 reduces the time 
required to OPEN an output file. 



The standard mode is entered in 
the PUB table at system generation 
or at IPL time. If the mode 
setting (different from, or the 
same as the standard mode) is 
specified in a temporary ASSGN 
statement, it becomes the current 
mode setting and is entered as 
such in the PUB table. When the 
current job ends, the standard 
mode is restored in the PUB table. 
The mode specification in a 
permanent ASSGN becomes the 
standard mode. If the x'ss' 
parameter is not specified for a 
job, the mode is the same as the 
standard mode. 



The specifications are: 





Bytes 




Trans- 








per 






late 




Convert 


ss 


Inch 
200 


Parit 


11 


Feature 


Feature 


10 


odd 


off 




on 


20 


200 


even 




off 




off 


28 


200 


even 




on 




off 


30 


200 


odd 




off 




off 


38 


200 


odd 




on 




off 


50 


556 


odd 




off 




on 


60 


556 


even 




off 




off 


68 


556 


even 




on 




off 


70 


556 


odd 




off 




off 


78 


556 


odd 




on 




off 


90 


800 


odd 




off 




on 


A0 


800 


even 




off 




off 


A8 


800 


even 




en 




off 


E0 


800 


odd 




off 




off 


E8 


800 


odd 




en 




off 


CO 


1600 


single 


density 


9-track 


CO 


1600 


dual 


d 


ensity 


9- 


•track 


C8 


800 


single 


densH 


ty 


9-track 


C8 


800 


dual 


d 


ensity 


9- 


-track 


DO 


6250 


single 


density 


9-track 


DO 


6250 


dual 


d 


ensity 


9- 


-track 



Note: The first 15 entries in 
this table are valid only for 
7-track tape. The last six 
entries are valid only for 9-track 
tape. 

In order to read a 7-track tape 
backwards, you must first create 
the tape file with the data 
convert feature off. 
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Also, under certain conditions, 
you are responsible for setting 
the mode of the tape to be 
processed. When using PIOCS with 
dual density tape units, a mode 
set must be issued if a rrcde is 
desired other than the one in 
which the tape was previously 
written. You should position the 
tape at LOAD POINT and issue a 
SET MODE command, followed by a 
WRITE command. 
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ALT Indicates an alternate magnetic 
tape unit that is used when the 
capacity of the original 
assignment is reached. The 
specifications for the alternate 
unit are the same as those of the 
original unit. The character- 
istics of the alternate unit must 
be the same as those of the 
original unit. The original 
assignment and an alternate 
assignment must both be permanent 
or temporary assignments. 
Multiple alternates can be 
assigned to a symbolic unit. When 
SYSIPT is assigned to a magnetic 
tape device, the file may not be 
multi volume. 

If the original unit is reassign- 
ed, the alternate unit must also 
be reassigned. The ALT operand is 
invalid for SYSRDR, SYSIPT, SYSIN, 
SYSLNK, SYSCLB, and SYSLOG. 

HI Indicates that input hopper one 

will be used for input on the 256 
or 5425. If neither HI ncr H2 is 
specified,, HI is assumed. 

H2 Indicates that input hopper two 

will be used for input on the 2560 
or 5425. H2 cannot be used as 
input hopper if the 2560 or 5425 
is assigned to a partition 
supported by POWER. Note that 
hopper specifications are 
significant only for device 
independent files associated with 
the logical units SYSIPT, SYSRDR, 
SYSIN, and SYSPCH. In all other 
cases they are ignored. If both 
hoppers are used, they must be 
assigned to the same partition. 
When using the 360/20 Emulator, 
refer to Model 20 Emulator on 
System/370; Reference , GC33-5388. 



PERM Indicates whether the assignment 
TEMP should be permanent (PERM) or 
temporary (TEMP) . It is thus 
possible to override the // 
specification or omission. 

VOL=volserno 

Specifies the volume serial number 
of the device required. This 
option may be specified only for 
tapes and disks. 

If VOL is specified, the system 
searches for the first free unit 
in the requested sequence and 
checks the volume label tc see if 
the required disk or tape is 
mounted. If not, the next free 
unit is checked, and so on until 



the proper volume serial number is 
found or until the end of the 
specified sequence is reached. 
The requested volume must be 
mounted on the unit specified in 
the message 1T50A MOUNT nnnnnn ON 
X'cuu' . 

SHR This option can be specified only 
for disk devices and has meaning 
only in combination with 
address-list, device-class, and 
device-type (see corresponding 
discussions) . 

BATCH 

The BATCH command (Start cr Continue 
Processing) serves to start or continue 
processing in one of the foreground 
partitions or to continue processing in the 
background partition. The function of the 
BATCH command is exactly the same as that 
of the START command. If the specified 
partition is available, job control reads 
the operator's next command from SYSLOG. 
When the operator desires to give control 
to another command input device, he makes 
an assignment to SYSRDR cr SYSIN, and 
presses the END or ENTER key. 

If the specified partition has been 
temporarily halted by a STOP command, it is 
made active. If the partition is in 
operation, it continues, and message 

lPlnD AREA NOT AVAILABLE 

is issued to the operator. In either 
instance, attention routine communication 
with the operator terminates following the 
BATCH command. 

AR Format 



BATCH 



BG 
Fl 
F2 
F3 
F4 



If the operand is omitted, BG is assumed. 
CANCEL 

The CANCEL command (Cancel Job), when used 
as a job control command, cancels the 
execution of the current job in the 
partition in which the command is given. 

When used as an attention comirand with 
an operand specified, it cancels the 
execution of the current job in the 
specified partition. 

JCC Format 

CANCEL 
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JCC Format 



CANCEL 



BG 
Fl 
F2 
F3 



CLOSE SYSXXX 



,X'cuu' [,X'ss' ]' 
r UA 

f IGN 
LfALT 



BG Indicates that the background job 
is to be canceled. 

F1-F4 Indicates that the foreground-one, 
-two, -three, or -four job is to be 
canceled. 

If one of these operands is specified, the 
attention routines wait for additional 
commands from SYSLOG. However, if the 
operand field is blank, the attention 
routines assume that the background job is 
to be canceled. The CANCEL command cannot 
be used to cancel the partition in which 
POWER is running. 



CLOSE 

The CLOSE command (Close Output Unit) is 
used to close either a system or programmer 
output logical unit assigned to a rragnetic 
tape, or a system logical unit assigned to 
a disk or 3540 Diskette. 

The CLOSE statement is used to close 
either a system or programmer logical unit 
assigned to tape. It applies only to 
temporarily assigned logical units. 

The logical unit can optionally be 
reassigned to another device, unassigned, 
or, in the case of a magnetic tape file, 
switched to an alternate unit. When SYSxxx 
is a system logical unit (SYSLST, SYSPCH, 
etc.), one of the optional parameters must 
be specified. When closing a programmer 
logical unit (SYSOOO-SYSnnn) , no optional 
parameter need be specified. When none is 
specified, the programmer logical unit is 
closed and the assignment remains 
unchanged. 

Closing a magnetic tape unit consists of 
writing a tapemark, an EOV trailer record, 
two tapemarks, and rewinding and unloading 
the tape. The trailer record contains no 
block count, and later access by logical 
IOCS may result in a 4131D message, which 
can be ignored. 



SYSxxx 



JCS Format 



// CLOSE SYSxxx 



fX'cuu't.X'ss'l 

,UA 

,IGN 

,ALT 



X'cuu 



X'ss 1 



UA 



IGN 



ALT 



DATE 



For .the CLOSE command only : Fo r 
disk or 3540 Diskette: SYSIN, 
SYSRDR, SYSIPT, SYSPCH, or SYSLST 

For .both the statement and the 
command : For magnetic tape: 
SYSPCH, SYSLST, SYSCUT, or 
SYSOOO-SYSnnn 

Specifies that after the logical 
unit is closed, it will be 
assigned to the channel and unit 
specified, c is the channel 
number (0-6) and uu is the unit 
number 00-FE (0-254) in 
hexadecimal. In the case of a 
system logical unit, the new unit 
will be opened if it is either a 
disk, 3540 Diskette, or a magnetic 
tape at load point. 

Device specification for mode 
settings on 7-track and 9-track 
tape. The specifications are 
shown in ASSGN-- Assign Logical 
Name. If X'ss* is net specified, 
the mode settings remain 
unchanged. The LISTIO command may 
be used to determine the current 
mode settings for all magnetic 
tape units. 

Specifies that the logical unit is 
to be closed and unassigned. 

Specifies that the logical unit is 
tc be closed and unassigned with 
the ignore option. This operand 
is invalid for SYSRDR, SYSIPT, or 
SYSIN. 

Specifies that the logical unit is 
tc be closed and an alternate unit 
is to be opened and used. This 
operand is valid only fcr system 
output logical units (SYSPCH, 
SYSLST, or SYSOUT) currently 
assigned to a magnetic tape unit. 



The DATE statement contains the job date 
that is put in the communication region. 
It is in either of the two following 
formats: 

JCS Formats 

// DATE mm/dd/yy 
// DATE dd/mm/yy 
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> 



mm = month (01 to 12) 
dd = day (01 to 31) 
yy = year (00 to 99) 

When the DATE statement is used, it applies 
only to the current job being executed, 
except for DASD output file labels for 
which the date from the SET coirirand is 
used. Job control does not check the 
operand except for a length cf eight 
characters. If no DATE statement is used, 
job control supplies the date given in the 
last SET command. 



DLAB 

The DLAB statement (DASD label 
information) , completed in a continuation 
statement,, contains file label information 
for DASD label checking and creaticn. This 
statement must immediately follow a volume 
(VOL) statement. The combination cf this 
statement with VOL and XTENT should not be 
used to provide the extent and label 
information for a 3330, 3333, or 3340. For 
a detailed discussion of DLAE, see DOS/VS 
DASD Labels, GC33-5375. The DLAB statement 
cannot be used for VSAM files. 

JCS Forma t 

// DLAB 'label fields 1-3' c 

xxxx,yyddd,yyddd , 'systemcode' [ , type] 



'label fields 1-3' 

The first three fields of the 
Format 1 DASD file label are 
contained just as they appear in 
the label. This is a 51-byte 
character string, contained within 
apostrophes and followed by a 
comma. The entire 51-byte field 
must be contained in the first of 
the two statements. Column 72 
must contain a continuation 
character. The columns between 
the comma and the continuation 
character must be blank. The 
Format 1 label is shown in 
"Appendix A". Fields 1-3 are: 

File Nam e. 4 4-byte alphameric 
including file ID and, if used, 
generation number and version 
number of generation. 

Format Identifier. 1-byte, 
EECDIC 1. 

File Serial Number . 6-byte 
alphameric, must be the same as 
the volume serial number in the 
volume label of the first or only 
pack of the file. 

C Continuation punch in column 72. 



xxxx Volume Se q uence Numbe r. This 
4-digit EBCDIC number is the 
EECDIC equivalent of the 2-byte 
binary volume sequence number in 
field 4 of the Format 1 label. 
This number must begin in column 
16 of the continuation statement. 
Columns 1-15 are blank. 

yyddd,yyddd 

The file creation date, followed 
by the file expiration date. 
These two 5-digit numbers are the 
EECDIC equivalent of the 3-byte 
discontinuous binary dates in 
fields 5 and 6 cf the Format 1 
label. yy is the year (00-99), 
and ddd is the day of the year 
(001-366). 

'systerrccde' 

System code is a 13-character 
string, within apostrophes. For 
an output file, it is written in 
field 8 of the Format 1 label. It 
is ignored when used for an input 
file. This field is not used by 
the DOS/VS label processing 
routines. It is recommended that 
this field be left blank. 

type This is a two- or three-character 
field indicating the type of file, 
as follows: 

SC for sequential disk or for 
DTFPH With MOUNTED=S INGLE 

DA for direct access or for 
DTFPH with MOUNTED=ALL 

ISC for indexed sequential using 
load create 

ISE for indexed sequential using 
load extension, add, or 
retrieve 

If this operand is emitted, SD is 
assumed. 



ELBL 



The DLBL statement (DASD label information) 
replaces the VOL and DLAE statement 
combination used in previous versions cf 
the system. It contains file label 
information for DASD or 3540 Diskette label 
checking and creation. (Prograiriring 
support for the previous VOL, ELAB, and 
XTENT combinations will be continued.) 
Together with the EXTENT statement, only 
DLBL should be used to supply extent and 
label information for the 3330/3333, 
3340, or 3540. For a detailed discussion of 
ELBL see DCS/VS DASD Labels, GC33-5375. 
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JCS Format 



// DLBL filename, ['file-ID' ], 

[date], [codes] , [data security] 



Continuation statements or commands are 
supported for DLBL. 



A comma must be inserted for each 
missing operand if any of the operands 
following file nam e are used. 



filename 



This can be from cne to seven 
alphameric characters, the first 
of which must be alphabetic. This 
unique filename is identical to 
the symbolic name of the program 
DTF that identifies the file. For 
VSAM, filename is identical to (1) 
dname of the FILE (dnaire) 
parameter in an Access Method 
Services command, and (2) the 
DDNAME=filename parameter of the 
Access-Method Control Block (ACB) 
in the processing program that 
identifies the file. If the 
DDNAME parameter is omitted, the 
filename must be placed in the 
symbolic name (label) field of the 
ACB. 



•file-ID' 



The unique name associated with 
the file on the volume. This can 
be from one to 44 bytes of 
alphameric data, contained within 
apostrophes, including file-ID 
and, if used, generation number 
and version number of generation. 
If fewer than 44 characters are 
used, the field is left- justified 
and padded with blanks. If this 
operand is omitted, fil e nam e is 
used. The 3540 Diskette uses a 
maximum of eight characters in 
file-ID. For VSAM, file-ID must 
be specified when an existing 
(input) file is being processed. 
The file-ID is identical to the 
name of the file, specified in the 
DEFINE command of Access Method 
Services, listed in the VSAM 
catalog. When a new VSAM data 
space or file is being created 
(defined), the file-ID is ignored 
if it is specified. For VSAM, the 
file-ID must be coded according to 
the following rules: 

• One to 44 alphameric (A-Z, 0-9, 
a, $, or #) characters or 
hyphen (-) or plus zero (+0) 
enclosed in apostrophes ( ' ) . 



After each group of eight or 
less characters, a period (.) 
must be inserted. 



• No embedded blanks are allowed. 

• The first character cf the 
file-ID and the first character 
following a pericd must be 
alphabetic or notaticnal (A-Z, 
a, $, #). 



date This can be from one to six 

characters indicating either the 
retention period of the file in 
the format d through dddd 
(0-9999), or the absolute 
expiration date of the file in the 
fcrmat yy/ddd (75/032). If 00/000 
is specified, the expiration date 
is treated as an omitted operand, 
ddd can also be specified as one 
tc three digits. If this operand 
is omitted, a 7-day retention 
period (based on the date entered 
via the SET command) is assumed. 
If this operand is present on an 
input file, it is ignored. For 
VSAM, this parameter is used 
instead of the expiration date 
specified in the DEFINE command of 
Access Method Services. The 
expiration date in the DEFINE 
command is ignored. However, VSAM 
files or data spaces can only be 
deleted through the DELETE command 
cf Access Method Services even 
though the expiration date has 
been reached. 



codes This is a two to four character 

field indicating the type of file 
label, as follows: 

SD for sequential disk or for 
DTFPH with MOUNTED=SINGLE 

DA for direct access cr for 
DTFPH With MOUNTED=ALL 

DU for 3540 diskette 

ISC for indexed sequential using 
load create 

ISE for indexed sequential using 
load extension, add, or 
retrieve 

VSAM for all Virtual Storage 
Access Method files 



If this operand is emitted, SD is 
assumed. 



( 
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data security 

A three-character field indicating 
that a data secured file is to be 
created or processed. At OPEN 
time, if a data-secured file is 
accessed, a warning message is 
issued to the operator who then 
decides whether or not the file 
may be accessed. 

DSF must be specified for a data 
secured output file. If it is 
omitted for an output file, an 
unsecured file is created. This 
operand is ignored for the 3540 
diskette. 

This operand is not required for 
an input file, and it does not 
invoke data security if the file 
was not originally created as a 
data secured file. For VSAM, this 
parameter is ignored. All VSAM 
files are data secured. 

DSPLY 

The DSPLY command (Display Virtual Storage) 
allows the operator to display 16 bytes of 
virtual storage, starting at the specified 
hexadecimal address, on the device assigned 
to SYSLOG. Two characters (0-9,a-f) appear 
on SYSLOG for each byte of information; 
these characters represent the hexadecimal 
equivalent of the current information in 
virtual storage. 

AR Format 

DSPLY address 

address The six digit hexadecimal address, 
with leading zeros if necessary, 
at which the storage display 
starts. 

If the specified address is within an 
invalid address area, the command is 
ignored and a corresponding informatory 
message is issued. 

If the 16 bytes to be displayed cross 
the boundary from a valid to an invalid 
address space, only the bytes in the valid 
address space are displayed, and a corre- 
sponding informatory message is issued. 



DUMP 

The DUMP comma 
print part or 
virtual addres 
The SYSLST use 
partition, but 
printer should 
dump, be used 
is assigned si 
interspersed p 



nd allows the operator to 
all of the real and/cr 
s area contents on SYSLST. 
d may be assigned to any 
it must be a printer. The 
not, at the time of the 
by the partition to which it 
nee this could result in 
artition and dump output. 



AR Format 

Dump Area Op erand 

blank 
S 

BG 
Fn 
DUMP (BGS 
TnS 
PDAREA 
address, address 

where n = 1, 2, 3, or 4 
Dump Area Operand N\\\ "* 



SYSLST Operand 

RbgH 
L(Fn)J 









k 



u 



VI 



,f : -\J 



blank 



BG 
Fn 



BGS 
FnS 



PDAREA 



address, 
address 



If the dump area operand is 
omitted, the following is 
printed: 

• the contents of the general 
registers, and 

• the contents of all real and 
virtual partitions in which 
programs are currently 
running. 

In the listings produced, the 
contents of both real and 
virtual partitions are in 
consecutive order; invalid 
address spaces (page pool) are 
indicated. 

Same as if duirp area operand was 
omitted. The contents of the 
supervisor area are also dumped. 

The contents cf the specified 
partition and its associated 
registers are printed. If a 
program is running in real mode 
in the specified partition, only 
the real, not the associated 
virtual partition, is dumped. 
If a program is running in 
virtual mode in the specified 
partition, the virtual partition 
is dumped, including any fixed 
pages. 

Same as if BG/Fn was specified. 
The contents cf the supervisor 
area are also dumped. 

The contents cf the PD table, PD 
area, and the alternate address 
area, if present, are printed. 

Specifies the start and end 
addresses of the storage area to 
be dumped. The contents of the 
general registers that are 
associated with the specified 
storage area are also printed. 



Job Control 31 



Page of GC33-5376-1, revised November 30, 1973, by TNL GN33-8767 



If the specified addresses are 
within an invalid address area, 
the command is ignored and an 
informatory message is issued. 

If the storage area crosses the 
boundary from a valid tc an 
invalid address space, only the 
contents of the specified valid 
address space are dumped, 
together with the general 
registers that are associated 
with the valid address area. A 
corresponding informatory 
message is issued. 

If the storage area to be dumped 
crosses partition boundaries, 
the specified storage area is 
dumped, together with those 
general registers that belong to 
the partition in which the 
starting address is located. 



§X§t§I!_9perand 



BG 
Fn 



The operand indicates the 
partition to which SYSLST is 
assigned for output of the dump. 
If it is omitted, the SYSLST 
assigned to the background 
partition is used. 



DVCDN 



The DVCDN command (Device Down) informs the 
system that a device is no longer 
physically available for system operations. 
If any temporary or standard assignment 
were made to the device specified in the 
command, they are unassigned when the 
command is accepted. Note: The assignment 
of SYSRDR is changed when a procedure is 
used. 



If the unit is a DASD device or 3510 
diskette, issue a CLOSE command for any 
system logical units currently assigned to 
it before issuing DVCDN. The DVCDN command 
unassigns these units without closing them. 
If a DVCDN command is issued with a system 
I/O unit assigned to the DASD device or 
3540 diskette, closing the file or 
reassigning it to another DASD device or 
3540 diskette is impossible. If an 
alternate assignment was made for the 
device specified, the alternate is removed. 
This command utilizes the logical transient 
area, and blocks out operator communication 
functions until it is completed. A DVCUP 
command must be issued before the device 
can be used again. 



JCC Format 

DVCDN X'cuu' 

The entry X'cuu' is expressed in 
hexadecimal form, where c is the channel 
number (0-6) and uu is the unit number, 
00-FE (0-254) in hexadecimal. 



DVCUP 

The DVCUP command (Device Up) informs the 
system that a device is available for 
system operations after the device has been 
down. As all assignments were removed by 
the preceding DVCDN command, an ASSGN 
command must be used to reassign this 
device. 

JCC Format 

DVCUP X'cuu' 

The entry X'cuu' is expressed in 
hexadecimal form, where c is the channel 
number (0-6) and uu is the unit number, 
00-FE (0-254) in hexadecimal. 

The DVCUP command makes use of 
supervisor services that prevent other 
operator communication during execution of 
this command. 

ENDSD 

The ENDSD command (End SD Aids) is used to 
terminate the execution of the SDAID 
program. It is used in debugging 
procedures and described in detail in 
pos/VS Serviceab il ity Aids and Debugging 
Procedur es, GC33-5380. 

AR Format 

ENDSD 

END CR ENTER 

The END or ENTER (End cf Communication) 
command must be issued whenever the 
operator has finished communicating with 
the system. It causes the communication 
routine tc return control to the mainline 
job. END applies to CPU models without DOC 
(display operator console) support. ENTER 
applies to CPU models with DOC support. 

JCC and AR Format 

Press the END or ENTER key. 

EXE C 

The EXEC command or statement (Execute 
Program or Procedure) indicates either 



32 DOS/VS System Control Statements 



Page of GC33-5376-1, revised November 30, 1973, by TNL GN33-8767 



the end of control information for a job 
step and the beginning of execution of a 
program, in which case it must be the 
last command or statement processed 
before a job step is executed, or 

that a cataloged procedure is to be 
retrieved from the procedure library by 
job control. In this case, other 
commands or statements may follow EXEC. 



JCS Format 

// EXEC["[[PGM=]progname] [,REAL] [ , SIZE=size]"| 
l_PROC=procedurename [,OV] J 

When issued (either from the console or 
from the card reader) to execute a 
procedure, control is given to the card 
reader at end-of -procedure. 

JCC Format 

EXECr[[PGM=]progname] t,REAL] [,SIZE=size]~| 
LPROC=procedurename[ ,0V] J 

When issued to execute a procedure (in this 
case, accepted from the console only) , 
control is given to the console at 
end-of -procedure. 

PGM=progname 

progname 

Represents the name of the program 
in the core image library to be 
executed. The program name 
corresponds to the first cr only 
phase of the program in the 
library. The program name can be 
from one to eight alphameric 
characters (0-9, A-Z, #, $, /, a). 
The first character must not be 
numeric. If the program to be 
executed has just been processed 
by the linkage editor, the program 
name is omitted and the PGM 
keyword cannot be used. 

REAL Indicates that the job step 

started by EXEC will be executed 
in real mode. If REAL is not 
specified, the job step is always 
executed in virtual mode. 



SIZE=size 



Defines how large a partition is 
needed for the program about to be 
executed. The SIZE parameter can 
be specified in combination with 
REAL (a) or without REAL (b) . 

(a) If specified together with 

REAL, it specifies the size of 
that part of the real 
partition that will be needed 
by the job step. The 
remaining part of the real 



partition is added to the page 
pool. 



If the SIZE parameter is 
omitted and REAL is specified, 
the whole real partition is 
reserved for the job step. 

(b) If used without REAL, it 
specifies the size of that 
part of the virtual partition 
that will be directly 
available to the job step. 

For programs (such as 
compilers) that dynamically 
allocate storage within the 
partition for wcrkareas, the 
SIZE parameter can be used to 
limit the virtual storage 
available (and thus reduce 
paging activity). The 
remainder of the partition may 
be used as additional storage 
for other modules or data 
required by the program in 
that partition. The program 
obtains this additional 
storage by issuing GETVIS 
macros with the required 
amount of storage as a 
parameter; it releases the 
storage again by issuing 
FREEVIS macros. 

If the SIZE parameter is 
omitted, the whole virtual 
partition is used for the job 
initiated with EXEC. SIZE 
(without REAL) must always be 
specified fcr VSAM programs or 
ISAM programs using the ISAM 
Interface Program (IIP) . 

The SIZE paraireter can be 
specified in the following 
formats: 

SIZE=nK 

SIZE=AUTO (see Note) 

SIZE=(AUTO,nK) 

where n must be greater than zero 
and should be a multiple of 
2 (if net, the system rounds 
the value up to the nearest 
2K boundary) . 

and AUTO indicates that the 

program size, as calculated 
by the system from 
information in the core 
image directory, is to be 
taken as the value for SIZE. 
For a multiple-phase program 
(where the first four 
characters of the phase name 
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are identical), the longest 
phase is used. 

and (AUTO,nK) indicates that job 
control must take the 
program size plus nK bytes 
as the value for SIZE. (If 
the total is not a multiple 
of two, the value is rounded 
up.) 

Note: Do not specify SIZE=AUTO 
for programs that dynamically 
allocate storage during execution 
(such as linkage editor, librarian 
program, and compilers). 

PROC=procedurename 

Represents the name of the 
procedure to be retrieved from the 
procedure library. The procedure 
name can be from one to eight 
alphameric characters. 

If the procedure name begins with 
$$, the system substitutes a 
partition-related character for 
the second $. The character that 
is substituted is related to the 
partition in which the procedure 
is invoked, that is, 

B for the BG partition 

1 for the Fl partition 

2 for the F2 partition 

3 for the F3 partition 

4 for the F4 partition. 

The procedure corresponding to 
this name is then retrieved for 
execution. 

Note that the EXEC PROC command 
can be entered on SYSLOG only (not 
on SYSRDR) , whereas the EXEC PROC 
statement may be entered on SYSLOG 
or on SYSRDR. 

OV Indicates that overwrite 

statements follow EXEC. If the 
EXEC PROC command was used (and 
entered on SYSLOG), the overwrite 
statements must also be entered on 
SYSLOG. 

If the EXEC PROC statement was 
used and entered en SYSRDR, the 
overwrite statements must be 
entered on SYSRDR (not on SYSLOG) . 

If you execute a non-ending job 
from the procedure library, you 
cannot update the procedure 
library. 

For more details, refer to the 
DOS/VS Ststem Manage ment Guide , 
GC33-5371. 



EXTENT 

The EXTENT statement (DASD Extent 
Information) defines each area, cr extent, 
of a DASD file. One or more EXTENT 
statements must follow each DLBL statement 
except for single input files for 
sequential disk on a disk or 354 diskette 
provided the DEVADDR parameter has been 
specified in the DTF table. For a detailed 
discussion of EXTENT, see DOS/VS DASD 
Labels, GC33-5375. Together with the DLBL 
statement, only EXTENT should be used to 
supply extent and label information for the 
3330/3333, 3340, and 3540 diskette. 

Note: The EXTENT cards should be checked 
carefully because an invalid field in the 
card causes the default options or the 
values entered by the previous EXTENT card 
to be overwritten by the valid entries of 
the flagged statement. 

Multiple extent cards are valid for 
system files on the 3540 diskette. Valid 
parameters are symbolic unit, serial 
number, and type. The other parameters 
will be ignored. 

This command or statement replaces the 
XTENT command or statement used in previous 
versions of the system. (Programming 
support for XTENT continues.) 



JCS Format 

// EXTENT [symbolic-unit] , 

[serial-number] , [type] , 
[sequence-number] , 
[relative-track] , 
[number-of -tracks] , 
[split-cylinder-track] , 
[B=bins] 

symbolic unit 

A six-character field indicating 
the symbolic unit (SYSxxx) of the 
volume for which this extent is 
effective. If this operand is 
emitted, the symbolic unit of the 
preceding EXTENT, if any, is used. 
If this operand is emitted on the 
first or only EXTENT statement, 
the symbolic unit specified in the 
DTF is assumed. A symbolic unit 
included in the extent information 
for SD, DA, or DU files, however, 
overrides the DTF DEVADDR=SYSnnn 
specification. (This operand is 
net required for an IJSYSxx 
filename, where xx is IN, PH, LS, 
LN, RS, SL, or RL, cr fcr a file 
defined with the DTF 
DEVADDR=SYSnnn.) If SYSRDR or 
SYSIPT is assigned, this operand 
must be included. This operand is 
required for VSAM. 
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In multi volume SD f DA, and DU 
files, each different symbolic 
unit must be assigned to a 
separate physical device. For DA 
files, the extent statements must 
be in ascending order. 



serial number 

From one to six characters 
indicating the volume serial 
number of the volume for which 
this extent is effective. If 
fewer than six characters are 
used, the field is left- justified 
and padded with blanks. 



type 



If this operand is omi 
volume serial number o 
preceding EXTENT is us 
Therefore, when a mult 
is being processed, th 
serial number of the f 
is assumed for the ent 
unless you specify thi 
the first extent of ea 
volume. If no serial 
provided in the EXTENT 
the serial number is n 
and it is your respons 
files are destroyed be 
wrong volume was mount 
operand is required fo 



tted, the 
f the 
ed. 

ivclume file 
e volume 
irst volume 
ire file, 
s field for 
ch following 
number was 
statement, 
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ibility if 
cause the 
ed. This 
r VSAM. 



For the 3540 dis 
operand specifie 
associated file 
this volume. If 
omitted, the OPE 
that the volume 
is the correct o 
checking will be 
files and space 
for an output fi 



kette, this 

s that the 

will be fcund on 

the parameter is 
N routines assume 
that was mounted 
ne. Label 

done for input 
will be allocated 
le. 



> 



One extent card must be submitted 
for each volume of an input file, 
and sufficient extent cards must 
be submitted for output files to 
ensure that enough volumes are 
present to contain the file. 



One character indicating the type 
of the extent, as fellows: 



1 - data area (no split cylinder) 

2 - independent overflow area (for 

indexed sequential file) 

4 - index area (for indexed 
sequential file) 

8 - data area (split cylinder, for 
SD files only) 



If this operand is emitted, type l' 
is assumed. Type 1 is the only 
valid parameter for diskette 
files. 

Note : For indexed sequential 
files, the extent information 
should be entered in the following 
order: 

1. Master index sequence number 
and 

type 4 

2. Cylinder index sequence number 
1 and type 4 

3. Prime data area sequence 
number 2 - n and type 1 

4. Independent overflow area 
sequence number n + 1 and 
type 2 

where n is the sequence number of 
the last prime data area extent. 



sequence number 

Ore to thre 
a decimal n 
indicating 
this extent 
file. Exte 
for the mas 
sequential 
index is no 
extent of a 
file has th 
The extent 
other types 
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the first e 
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e characters containing 
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nt sequence is used 
ter index of an indexed 
file. If the master 
t used, the first 
n indexed sequential 
e sequence number 1. 
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of files begins with 
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xtent of ISFMS files, 
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a this parameter is 
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relative track 

One to five characters indicating 
the sequential number of the 
track, relative to zero, where the 
data extent is tc begin. If this 
field is omitted on an ISFMS file, 
the extent is net accepted. This 
field is not required for SD input 
files (the extents freir the file 
labels are used). This field must 
be specified for DA input files. 

For VSAM, this operand must be 
specified when a data space or a 
file with the UNIQUE option is 
being created (defined by Access 
Method Services). This operand is 
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( 



not required, and it is ignored if 
it is specified, when a VSAM file 
is created within an existing data 
space. In this case, the space 
for the file is sub-allocated by 
VSAM from direct-access extents it 
already owns. This operand is 
also not required for VSAM input 
files because the extents are 
obtained from the VSAM catalog. 

When using split cylinder files, 
this parameter designates the 
beginning of the split as well as 
the first track of the file. 

Formulas for converting actual to 
relative track (RT) and relative 
track to actual for the DASD 
devices follow. 

Actual to Relative 

2 311 10 x cylinder number + 

track number = RT 

2314/ 20 x cylinder number + 
2319 track number = RT 

2321 1000 x subcell number + 100 
x strip number + 20 x 
cylinder number + track 
number = RT 

3330/ 19 x cylinder number + 

3 333 track number = RT 

3340 12 x cylinder number 
+ track number = RT 

Relative to Actual 

2 311 RT = quotient is cylinder, 

10 remainder is track 

2314/ RT = quotient is cylinder, 
2319 20 remainder is track 

2321 _RT_ = quotient is subcell, 
1000 remainderl 

remainderl = quotient is 
100 strip, 

remainder2 

remainder2 = quotient is 
20 cylinder, re- 
mainder is 
track 

3 3 30/ RT = quotient i;> cylinder, j 
3333 19 remainder .• s track 



nuirber of tracks 

One to five characters indicating 
the number cf tracks to be 
allotted to the file. For SD 
input, this field may be omitted. 
For an indexed sequential file, 
the number cf tracks for prime 
data must be a multiple of 10 for 
2311, of 19 fcr 3330 or 3333, of 
12 for 3340, and of 20 for 2314 or 
2319. The number of tracks fcr a 
split cylinder file must be the 
product of the number of cylinders 
fcr the file and the specified 
number of tracks per cylinder for 
that file. 
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split cylinder track 

One or two characters, from 0-19, 
indicating the upper track number 
fcr the split cylinder in SD 
files. 



bins 



One or two characters 
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was created, cr en wh 
extent is currently 1 
the field is cne char 
creating bin is assum 
zero. There is no ne 
a creating bin fcr SD 
files. If this cpera 
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HOLD 



The HOLD cemmand is used tc hold 
assignments if you want to stop cr unbatch 
a partition. 



3 3 40 RT = quotient is cylinder, JCC_ Format 
12 remainder i track 

(F1[,F2] [,F31[,F4] 
Example: Track 5, cylinc r 150 on HOLD j 
a 3330 = 2855 in relative track. I F4 ( ,F3] [ ,F2] [ ,F1] 



36 DOS/VS System Control Statement « 



Page of GC33-5376-1, revised November 30, 1973, by TNL GN33-8767 



IGNORE 



Whenever an abnormal condition arises, the 
operator will be notified by an appropriate 
message on SYSLOG. Depending on the 
situation, he may have to ignore the 
condition by entering an IGNORE coirmand. 
This is indicated under 'Operator Action' 
in DOS/VS Messages, GC33-5379, for each 
message appearing on SYSLOG. 



JCC and AR Format 
IGNORE 



Notes: 



If the JOB card is emitted 
from the job stream, no 
duration and/or date is 
printed at end of job (when 
the /& card is read) . 

The start tiire that the job 
accounting routines store in 
byte 36 of the Job Accounting 
Table is calculated from the 
values in virtual storage 
locations 80 and 84. 



LBLTYP 



JOB 



The JOB statement indicates the beginning 
of control information for a job. It is in 
the following format. 



JCS Format 

// JOB jobname [accounting information] 

jobname The name of the job. Must be one 
to eight alphameric characters, 
except blank, equal sign (=) , and 
comma (,). when a job is 
restarted, the jobname must be 
identical to that used when the 
checkpoint was taken. Any user 
comments can appear on the JOB 
statement following the jebnaire 
(through column 72). If the timer 
feature is present, the time of 
day appears in columns 73-100 when 
the JOB statement is printed on 
SYSLST. The time of day is 
printed in columns 1-28 on the 
next line of SYSLOG. 

In both cases the format is 

DATE mm/dd/yy, CLOCK hh/mm/ss 



accounting information 

If the job accounting interface 
has been specified during system 
generation, 16 characters of 
user- specif ied accounting 
information can be entered in the 
JOB statement. This information 
is moved to the Job Accounting 
Table. If accounting information 
is specified, it must be separated 
from the job name by a single 
blank. If the job accounting 
interface is not specified during 
system generation, accounting 
information is ignored. 



The LBLTYP statement (Reserve Storage for 
Label Information) defines the amount of 
storage to be reserved at link-edit time or 
at execution time (for self-relocating 
programs) for processing cf tape and 
nonsequential disk file labels in the real 
cr virtual address area cf virtual storage. 
It applies to both background and 
foreground virtual programs. It is to be 
submitted immediately preceding the // EXEC 
LNKEDT statement, with the exception of 
self -relocating prograrrs, for which it is 
instead submitted immediately preceding the 
// EXEC statement for the program. 

Storage for VSAM label processing is 
reserved automatically by VSAM routines; an 
LBLTYP statement is net required. 

JCS Format 



// LBLTYP 



TAPEt (nn) ] 
NSD(nn) 



TAPE[(nn)] Used only if tape files 

requiring label information are 
to be processed, and no 
nonsequential DASD files are to 
be processed. nn is optional, 
and is present only for future 
expansion. (It is ignored by 
job control.) 

NSD(nn) Used if any nonsequential DASD 
files are to be processed 
regardless cf ether type files 
to be used. nn specifies the 
largest number of extents to be 
used for a single file. 



The amount of storage that must be reserved 
for label information is: 

1. For standard tape labels (any number) : 
80 bytes. 

2. For sequential DASD and DTFPH 
MOUNTED=SINGLE: bytes. 
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3. For DTFIS, DTFDA, and DTFPH 

MOUNTED =ALL: 84 bytes plus 20 bytes 
per extent. 

The area reserved is that required by the 
file with the largest requirement. This 
area is used during OPEN. 



LISTIO 

The LISTIO command or statement (List I/O 
Assignment) causes the system to print a 
listing of I/O assignments. The listing 
appears on a SYSLOG (command) or SYSLST 
(statement) . If SYSLST is not assigned, 
the LISTIO statement is ignored. 



JCS Format 



SYS 

PROG 

BG 

Fl 

F2 

F3 

F4 

ALL 

SYSxxx 

UNITS 

DOWN 

UA 

X'cuu' 



// LISTIO 



JCC Format 



ALL Lists the physical units assigned 
tc all logical units. 

SYSxxx Lists the physical units assigned 
to the logical unit specified 
(invalid for SYSOUT and SYSIN) . 
The assignment is given for the 
partition from which the command 
is given. 

UNITS Lists the logical units assigned 
to all physical units. 

DOWN Lists all physical units specified 
as inoperative. 

UA Lists all physical units not 

currently assigned to a logical 
unit. 

X'cuu* Lists the logical units assigned 
tc the physical unit specified. 



Physical units are listed with current 
device specification fcr magnetic tape 
units. Logical units are listed with 
ownership (background, f creground-cne, 
-two, -three, or -four), when applicable. 
If a unit has a standard assignment in one 
mode and a temporary assignment in another 
mode, the CMNT column identifies the type 
of assignment for each indicated mode. An 
example of a listing produced by the LISTIO 
Fl command is shown in Figure 4. All 
channel and unit numbers are represented in 
hexadecimal. 



SYS 
PROG 
BG 
Fl 
F2 
LISTIO | F3 
F4 
ALL 

SYSXXX 
UNITS 
DOWN 
UA 
X'CUU' 



SYS Lists the physical units assigned 
to all background system logical 
units. 

PROG Lists the physical units assigned 
to all background programmer 
logical units. 

BG Lists the physical units assigned 
to all logical units of the 
background partition. 

F1-F4 Lists the physical units assigned 
to all logical units of the 
particular foreground partition. 



If a standard or permanent assignment is 
temporarily overwritten, STD in the CMNT 
(comment) column indicates the permanent 
assignment, whereas the temporary 
assignment is printed one line above (see, 
for example, SYSSLB in Figure 4) . 

If a device is assigned only 
temporarily, UA is printed in the STD line 
(see SYS002 in Figure 4). 



ALT in the CMNT column indicates that an 
alternate tape has been assigned. 



LOG 



The LOG command causes the system to log, 
on SYSLOG, columns 1-72 of all job control 
commands and statements cccuring in the 
partition in which the LOG is issued. The 
AR LOG affects all the partitions. The LOG 
function is effective until a NOLOG command 
for the partition involved is sensed. 



The LOG command suppresses the ACANCEL 
function in the supervisor. 
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// ASSGN 


SYSSLB ; 


X' 131 ' 






// ASSGN 


SYSOOO, 


X' 


290' 








ASSGN 


SYS001 , 


X 1 


280' 


,X»CO f 




ASSGN 


SYS001, 


X 1 


281 ' 


,AL1 






// ASSGN 


SYS002, 


X 


280' 


,X*C0' 




// ASSGN 


SYS003, 


X 


281 ' 








// ASSGN 


SYSOOO. 


X 


282' 


,X'CO f 




// LISTIO Fl 














«"-' 


" 


FOREGROUND 1 




I/O UNIT 


CMNT 




CHNL 


UNIT 


MODE 


SYSRDR 











OC 




SYSIPT 











OC 




SYSPCH 






5C " 


UA 


:::: 




SYSLST 











CE 




SYSLOG 











IF 




SYSLNK 






1 




31 




SYSRES 






1 




30 




SYSSLB 






1 




31 




SYSSLB 


STD 




1 




30 




SYSRLB 






1 




30 




SYSREC 






1 




30 




SYSCLB 






:::c 


UA 


:::: 






-• 


•" 


FOREGROUND 1 




I/O UNIT 


CMNT 




CHNL 


UNIT 


MODE 


SYS000 






2 




90 




SYS000 


STD 




*Z 2C 


UA 


*Z 2C 




SYS001 






2 




80 


CO 


SYS001 


ALT 




2 




81 


CO 


SYS002 






2 




80 


CO 


SYS002 


STD 




:::: 


UA 


:::: 




SYS003 






2 




81 


CO 


SYS003 


STD 




3C «c 


UA 


:c:c 




SYS004 






2 




82 


CO 


SYS004 


STD 




:::c 


UA 


::;: 




SYS005 






:::: 


UA 


'.'.'.'. 




SYS006 






:c:: 


UA 


;::; 




SYS007 






:::: 


UA 


:::: 




SYS008 






;::: 


UA 


JC *' 




SYS009 






:j:{ 


UA 


«C 5£ 




SYS010 






:::: 


UA 


5C Zi 




SYS01 1 






:c:c 


UA 


:c:i 




SYS012 






;; ;; 


UA 


::;: 




SYS013 






:c:c 


UA 


;c;c 




SYS014 






;c :c 


UA 


:c:: 




SYS01 5 






:::: 


UA 


}»»* 




SYS016 






:::; 


UA 


an 




SYS017 






:::: 


UA 


:;:: 




SYS018 






" ;; 


UA 


" 5C 




SYS019 






" 5' 


UA 


scs: 




SYS020 






*t 2C 


UA 


2C 1* 




SYS021 






::" 


UA 


" ?c 




SYS0 2 2 






*£ 2* 


UA 


:c:c 




SYS023 






;::: 


UA 


5C 2C 




SYS024 






" ** 


UA 


** ** 





JCC and AR Format 



LOG 



The operand field is ignored by the system. 

MAP 

The MAP command produces on SYSLOG a map of 
the storage areas allocated to programs. 
It indicates program execution mode (R,V), 
and whether a partition is inactive (I) or 
active (A) for each partition. 

JCC and AR For mat 

MAP 

The map of storage areas allocated to 
partitions is produced in the following 
format: 



r t 




T _ T ~ T T 1 


1 1 




1 UPPER | 


[UPPER | | 


| AREA | K 


-REAL| LIMIT |K-VIRT 


LIMIT |NAME | 


1- 4— 




.j x _ 


L J_ J 


r T 




1 — t r t t 


|SP | 


92K 


I 94207| 


262144J | 


|BG V5A| 


30K 


|124927| 68K 


331775| MINE | 


|F4 14 | 


10K 


| 135167 | 80K 


| 413695 | | 


|F3 13 | 


10K 


| 145407 | 80K 


495615| | 


|F2 12 | 


14K 


| 159743| 100K 


| 598015 | | 


|F1 11 | 


14K 


|174079| 120K 


720895| | 


|SVA | 




1 | 64K 


|786431| | 


|VIS | 




1 1 OK 


786431| | 


|PP | 


86K 


| 2621431 




L _ X 




_J _ X _ X X- J 


Figure 5. 


Map 


of Storage Areas 



Not e: The output does not indicate storage 
temporarily added to the page peel as a 
result of using the SIZE parameter of the 
EXEC statement. 



AREA 



K-REAL 



SP = supervisor 

BG, F4, F3, F2, Fl = partition 

SVA = shared virtual area 

VIS = system GETVIS area 

PP = main page pool 

R = real mode 

V = virtual mode 

I = inactive partition 

A = active partition (or system 

directory list has been 

built in the SVA) 
1-5 = priority of partition 

Shows the number of K bytes 
allocated in the real address 
area. 



Figure 4. Example of LISTIO Fl Output 



UPPER LIMIT Shows the highest storage 

address (in deciiral) of each 
area in the real address area, 

K-VIRT Shows the nuirber of K bytes 
allocated in the virtual 
address area. 
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UPPER LIMIT Shows the highest storage 

address (in deciiral) cf each 
area in the virtual address 
area. For the supervisor, this 
field specifies the start 
address of the virtual address 
area. 



AR Format 



NAME 



Contains the name of the job 
that is currently executing in 
the corresponding partition. 
This field is blank for the 
supervisor, SVA, VIS, and main 
page pool. 



For an active partition when no 
JOB statement or command was 
entered, the name field 
contains NO NAME. For an 
inactive foreground partition, 
the name field is blank. 



MODE 



The MODE command allows you to alter the 
recording mode. 



The MODE command provides the following 
options for controlling recoverable machine 
check interrupts (MCI) : 



The mode of recording for unlabeled and 
nonstandard labeled tape can be reset. 

The recording mode for a particular 
device other than a teleprocessing 
device can be set to intensive cr 
diagnostic, or no recording mode can be 
specified. 

The mode that the system is operating in 
(the status of the system) can be 
requested. 

An EFL threshold value can be specified 
to override the IBM-supplied value. 

The MODE command can also be used to 
place the Model 115 control storage ECC 
in threshold mode. 



MODE 



IR 
CR 
CE,cuu 



R 

STATUS 
HIR 
ECC 



,1 [ ,xx,y]' 

,D[,xx,y] 



Cc] 



,R 
,Q 
L,THJ 



[,E=eeee] [,T=tttt] 



♦Note: When either HIR cr ECC is 
specified, at least one cf the optional 
operands must be selected. TH is only 
valid for the Model 145 when ECC,C is 
specified with the MODE command. 

For a Model 115 or 125, a MODE command 
is valid only if RMSR is supported. Even 
then, only the operands IR, CR, and CE may 
be used. The operands R, STATUS, HIR, and 
ECC must never be specified for a Model 115 
or 125. 



The meanings of the operands are: 



IR 
CR 



CE 



Recording mode for nonstandard 
labeled and unlabeled tape. Specify 
Individual Recording (IR) if you 
wish to record and then reset the 
tape error statistics at each tape 
OPEN. Specify Combined Recording 
(CR) to accumulate all the 
statistics frcm nonstandard labeled 
and unlabeled tape on a specific 
tape unit until a standard labeled 
tape is opened. Then one recording 
of the statistics from all the 
nonstandard labeled and unlabeled 
tapes is made on SYSREC, and the 
statistical counters are reset in 
the PUB2 table. 



The recording mode for a device at 
physical location X'cuu' may be 
reset. The possible recording modes 
are: 



Normal. The default, normal, is 
assumed. 



The MODE command is a notational command. 
Operands of the MODE can be entered in any 
order and must be continuous (that is, no 
blanks are allowed between or within 
operands) . The STATUS operand cannot have 
any other operand, before or after it. 

The total length of the MODE command 
must not exceed 30 characters. 



Intensive. Normal recording 
continues. In addition, the next 
seven errors of a particular type 
(xx t y) or the next seven errors 
cf any type (if xx,y is not 
specified) are recorded. The 
number of I/O retries required 
for success is not recorded. 
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Diagnostic. Normal recording 
continues. In addition, the next 
seven errors of a particular type 
(xx,y) or the next seven errors 
of any type (if xx f y is not 
specified) are recorded. The 
number of I/O retries required 
for success is alsc recorded. 



N No recording. 

When the recording node parameter is 
the last parameter of the MODE 
command, a check is made to see if 
all errors are recorded. When in 
intensive or diagnostic mode, it is 
possible to check for only one type 
of error. Indicate the bit to be 
examined with: 

(xx,y) where y is the bit (0-7) 
and xx the byte (0-31) of 
sense data tc be checked. 



STATUS A report is printed on SYSLOG which 
indicates: 

• The type of facility used 
(HIR,ECC) 

• System mode of operation 

• Current error count 

• Error count threshold 

• Current elapsed time 

• Time threshold 

• Number of buffer pages deleted. 



A buffer page is a 32-byte work area 
in control storage that is used by 
the Model 135 hardware program. 

The status report formats are: 
HIR,, IC , aaaa/eeee, bbbb/tttt 



Fcr the Models 155-11 and 158 



! R ) 



ECC , Q I , aaaa/eeee , bbbb/tttt 

BUF DLT=XXX 

where: 

aaaa = Current errcr count 
eeee = Error count threshold 
tbtb = Current elapsed time 
tttt = Time threshold 
xxx = Total number of inoperable 
buffer pages deleted. 



HIR Hardware Instruction Retry. This 

operand changes the mcde cf the HIR 
facility to R or C and/or modifies 
the error count threshold and/or 
time threshold. 

N ote : When HIR is placed in quiet 
mcde, ECC, alsc gees into quiet 
mode. 

ECC Errcr Correction Cede. This operand 
changes the mode cf the ECC facility 
tc R or Q, and/cr modifies the error 
count threshold and/or time 
threshold. ECC,R and ECC,Q are the 
only valid modes of diagnosis for 
the Model 135. If ECC is specified 
for a Model 145, M or C must also be 
specified. ECC can alsc place the 
Model 145 control storage in 
threshold mode. 

Note: Use of the Errcr Correction 
Code (ECC) in full recording mode 
may cause severe system degradation. 
Thus, the [ECC,M/C,R] operand 
comtination of the MODE command 
shculd only be used by the customer 
engineer or at his request. 



> 



For the Model 135 



R 
ECC, IQ 



For the Model 145 

(R) (M) 
ECC , ( Q ) , ( C j , aaaa/eeee , bbbb/tttt 

where: 

aaaa = Current error count 
eeee = Error count threshold 
bbbb = Current elapsed time 
tttt = Total threshold 



Recording Mo de 

MCDE R - places bcth HIR and ECC in 
recording mode. 

MODE HIR,R - places HIR in 
recording mode. 

MCDE ECC,R (Models 155-11 and 158) - 
if HIR is already in recording mode, 
it places ECC in recording mode. 

MCDE ECC,M,R (Mcdel 145) - if HIR is 
already in recording mode, real 
storage is placed in recording mode. 

MODE ECC,C,R (Model 145) - if HIR is 
already in recording mode, control 
storage is placed in recording mode. 
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Quiet Mode 



AR Forirat 



MODE HIR,Q - places both HIR and ECC 
in quiet mode. 

MODE ECC,Q (Models 135, 155-11, and 
158) places ECC in quiet mode. 

MODE ECC,M,Q, (Model 145) - places 
real storage in quiet mode. 

MODE ECC,C,Q (Model 145) - places 
control storage in quiet mode. 



MSG (BG 
Fn 



Fn indicates the desired foreground 
partition. BG indicates the background 
partition; pressing the INTERRUPT key, 
however, produces the saire result for BG . 

If the program in the specified 
partition has not established operator 
communication linkage, a message is printed 
en SYSLOG informing the operator of this 
condition. 



M or C Real or control storage: M or C is 
only valid for the Model 145. M or 
C must be specified when ECC is 
specified for the Model 145. M 
indicates real storage and C control 
storage. 



MTC 



The MTC ccirmand or stateirent controls IBM 
2400/3400 series magnetic tape operations. 
The first operand specifies the operation 
tc be performed. 



TH Threshold Mode: on the next 

occurrence of an ECC control storage 
error, control storage is placed in 
quiet mode. TH is only valid for 
the Model 145 if ECC,C is specified. 
TH places the Model 145 control 
storage ECC in threshold mode. 



E=eeee Values entered for E and T irust 
T=tttt be within the following decimal 
ranges: 

E - 8 (initial value) through 
9999 

T - 8 (initial value) through 
9999 



The IBM-supplied value is 8. 

Note: Whenever HIR is in quiet 
mode, ECC mode must net be changed. 



For the Model 135, the only valid 
mode commands are: 



MODE CE,,. .. 
MODE STATUS 
MODE ECC,Q 
MODE ECC,R 



MSG 



JCS Format 

// MTC opcode, SYSxxx [,nn] 

JCC Format 

MTC opcode, (x' cuu' )t ,nn] 
(SYSxxx) 

The first operand can be: 



r t 

| Opcode | Meaning 




|Eackspace one file sc tape is 

| positioned for reading the 

|tapemark preceding the file 

| backspaced. 

|Eackspace record. 

| Data security erase.* 

| Erase gap (write blank tape). 

| The tape is positioned beyond the 

|tapemark following the file spaced 

| ever. 

| Forward space record. 

| Rewind and unload tape. 

| Rewind tape. 

| Write taperrark. 



H 



Data security erase (3400-series only). 
This ccirmand erases a tape frcm the 
point at which the tape is positioned 
when the operation is initiated up to 
the end-of- tape reflective marker. If 
data is written after the end-of-tape 
reflective marker, the data must be 
erased with [//] MTC ERG SYSnnn. 



The MSG command transfers control to an 
operator communications routine previously 
activated by a STXIT command. 



To ensure that a DSE failure is detected 
quickly, rewind or rewind-unload should be 
performed with an MTC rather than manually. 
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If the DSE command is issued when the 
tape is at load point, the contents of the 
tape, including the volume label, are 
erased completely. In such a case the tape 
must be reinitialized or a tapemark must be 
written on it before it can be used again. 

The partition that issued the [//] MTC 
DSE command is placed in the wait state 
until the end-of-tape reflective marker is 
reached. 

The second operand, SYSxxx, represents 
any assigned logical unit. 

X'cuu' is the channel and unit in 
hexadecimal where c is the channel number 
(0-6) and uu is the unit number, 00-FE 
(0-254). X'cuu' is not valid for JCS. 

The optional third entry, nn, is a 
decimal number (01-99) representing the 
number of times the specified operation is 
to be performed. If nn is not specified, 
the operation is performed once. 



NEWVOL 

If an assignment specifying VOL= was given 
for a disk or tape unit and the system 
cannot find the requested volume on that 
unit, then the system prints a message on 
SYSLOG. The message 1T50A requests the 
operator to mount the desired volume. The 
partition enters the wait state. After 
having mounted the proper volume, the 
operator issues the NEWVOL attention 
command to indicate that processing may 
continue with the new volume. 



JCC and AR Format 

NOLOG 

The operand field is ignored by the system. 

OPTION 

The OPTION statement specifies one or more 
of the job control options. The format of 
the OPTION statement is: 

JCC Format 

// OPTION optionll,option2. . .] 

The options that can appear in the operand 
field follow. Selected cpticns can be in 
any order. Options are reset to the 
standards established at systeir generation 
time upon encountering a JOB or a /£ 
statement. 

LOG Lists columns 1-80 cf all control 
statements and commands on 
SYSLIST. Ccntrcl statements and 
commands are not listed until a 
LOG option is encountered. Once a 
LOG option statement is read, 
legging continues from job step to 
job step until a NOLOG option is 
encountered or until either the 
JOB or /£ ccntrcl statement is 
encountered. 

NOLOG Suppresses the listing of all 
valid control statements and 
commands on SYSLST until a LOG 
option is encountered. If SYSLST 
is assigned, invalid statements 
and commands are listed. 



AR Format 
NEWVOL 



[58] 



If no operand is specified, EG is assumed. 
Fn can be specified as Fl, F2, F3, or F4. 
If the specified partition is not waiting 
for a volume to be mounted, an error 
message is printed on SYSLOG. 



NOLOG 

The NOLOG command (Suppress Logging) 
terminates the listing, on SYSLOG, of job 
control commands and statements (except 
JOB, PAUSE, STOP, ALLOC, ALLOCR, MAP, HOLD, 
DVCDN, DVCUP, *, EOJ (/S) , and EOP (/+)) 
that occur in the partition in which the 
NOLOG is issued. The NOLOG attention 
command affects all the partitions. The 
NOLOG function is effective until a LOG 
command for the partition involved is 
sensed. 



DUMP Dumps the registers and the 

virtual or the temporary real 
partition on SYSLST, if assigned, 
in the case of an abnormal program 
end (such as prograir check) . 

NODUMP Suppresses the DUMP option. 

LINK Indicates that the object module 
is to be link-edited. When the 
LINK option is used, the output of 
the language translators is 
written on SYSLNK. The LINK 
option must always precede an 
EXEC LNKEDT statement in the input 
stream. (CATAL also causes the 
LINK option tc be set.) LINK is 
accepted by job control operating 
in a foreground partition if 
NPARTS=2-5 and PCIL=YES is 
specified during system generation 
and a private core image library 
is assigned. The LINK cption is 
reset to NOLINK upon encountering 
an ASSGN statement cr command for 
SYSLNK. 
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NOLINK suppresses the LINK option. The 
language translators can also 
suppress the LINK option if the 
problem program contains an error 
that would preclude the successful 
execution of the problem program. 



DECK Language translators produce 

object modules on SYSPCH. If LINK 
is specified, the DECK option is 
accepted by the PL/I, FORTRAN IV, 
American National Standard and 
DOS/VS COBOL compilers, and the 
assembler. 



NODECK Suppresses the DECK option. 

EDECK The assembler punches all valid 

source macro definitions in edited 
format on SYSPCH. These iracro 
definitions can be included in 
sublibrary E of the source 
statement library. 

NOED^CK Suppresses the EDECK option. 

ALIGN The assembler aligns constants and 
data areas on proper boundaries 
and checks the alignment of 
addresses used in machine 
instructions. 

NOALIGN Suppresses the ALIGN option. 

LIST Language translators write the 

source module listing en SYSLST. 
The assembler also writes the 
hexadecimal object module listing 
and the assembler and FORTRAN 
write a summary of all errors in 
the source program. All are 
written on SYSLST. 

NOLIST Suppresses the LIST option. This 
option overrides the printing of 
the external symbol dictionary, 
relocation list dictionary, and 
cross reference (XREF) list. 

LISTX The ANS and DOS/VS COBOL compilers 
produce a PROCEDURE DIVISION MAP 
on SYSLST. The PL/I and FORTRAN 
compilers produce the object 
modules on SYSLST. 

NOLISTX Suppresses the LISTX option. 

SYM The American National Standard and 
DOS/VS COBOL compilers produce a 
DATA DIVISION map on SYSLST; the 
PL/I compiler produces the symbol 
table on SYSLST; the COBOL 
compilers produce a DATA DIVISION 
map on SYSLST. 

NOSYM Suppresses the SYM option. 



XREF The assembler writes the symbolic 
cross-reference list on SYSLST. 

NOXREF Suppresses the XREF option. 

ERRS The FORTRAN, ANS and DOS/VS COBOL, 
and PL/I compilers summarize all 
errors in the source program on 
SYSLST. 

NOERRS Suppresses the ERRS option. 

ACANCEL This option indicates that the job 
must be canceled (instead of 
awaiting operator intervention) if 
an attempt to assign a device is 
unsuccessful. This may be due to 
an undefined device, invalid 
device status, unassignable unit, 
or conflicting I/O assignments. 
At end-of-job, this option is set 
tc the standard setting specified 
at system generation time. 

NOACANCEL 

Suppresses the ACANCEL option. 
The system awaits operator 
intervention in the case of an 
unsuccessful assignment. 

CATAL A phase or program is cataloged in 
the core image library at the 
completion of a link-edit run. 
CATAL also sets the LINK option. 
CATAL is accepted by job control 
operating in a foreground 
partition if NPARTS=2-5 and 
PCIL=YES is specified during 
system generation and a private 
core image library is assigned. 

STDLABEL All DASD or tape labels submitted 
after this point are written at 
the beginning of the standard 
label track. Reset to USRLABEL 
option at end of job or end-of-job 
step. All file definition state- 
ments submitted after this option 
are available to any program in 
any partition until another set of 
standard file definition 
statements is submitted. STDLABEL 
is not accepted by job control 
operating in a foreground parti- 
tion. All file definition state- 
ments following OPTION STDLABEL 
are included in the partition 
standard file definition set un- 
til one of the following occurs: 

1. End-of-job step. 

2. End-of-job. 

3. OPTION USRLABEL is specified. 

4. OPTION PARSTD is specified. 

OPTION STDLABEL followed by a /6 
clears the standard label track. 
(See Note.) 
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USRLABEL All DASD or tape labels submitted 
after this point are written at 
the beginning of the user label 
track. (See Note.) 

PARSTD All DASD or tape labels submitted 
after this point are written at 
the beginning of the partition 
standard label track. Reset to 
USRLAEEL option at end of job or 
end-of-job step. All file 
definition statements submitted 
after this option are available to 
any program in the current 
partition until another set of 
partition standard file definition 
statements is submitted. All file 
definition statements submitted 
after OPTION PARSTD are included 
in the standard file definition 
set until one of the following 
occurs: 

1. End-of-job step. 

2. End-of-job. 

3. OPTION USRLABEL is specified. 

4. OPTION STDLABEL is specified. 

OPTION PARSTD followed by a /& 
clears the partition standard 
label track. 



case, the options are reset to the standard 
that was established when the system was 
originally generated. 

Any assignment for SYSLNK after the 
occurrence of the OPTION statement cancels 
the LINK and CATAL options. These two 
options are also canceled after each 
occurrence of an EXEC statement with a 
blank operand. 

Note: Refer to DO S/V S_Tape_La.be Is , 
GC33-5374, and DOS/VS DASD Labels, 
GC33-5375 for additional information about 
STDLABEL, USRLABEL, and PARSTD. 

CVEND 

The CVEND (Overwrite End) statement or 
command applies to cataloged procedures 
only. It is used to indicate that no more 
overwrite statements will follow for the 
respective procedure. 



JCS Forirat 



// OVEND 



JCC Format 



[comment] 



CVEND 



[comment] 



For a given filename, the sequence 
of search for label information 
during an OPEN is the USRLABEL 
area, followed by the PARSTD area, 
followed by the STDLAEEL area. 
(See Note.) 



For the use of overwrite statements and the 
rules that apply to temporary procedure 
modification, refer to the DQS/VS_System 
Management Guide , GC33-5371. 

PAUSE 



48C Specifies the 48-character set on 
SYSIPT (for PL/I) . 

60C Specifies the 60-character set on 
SYSIPT (for PL/I) . 

SYSPARM= 'string' 

Specifies a value for the 
assembler system variable symbol 
$SYSPARM. $SYSPARM gets the value 
of the string, which is enclosed 
by quotes. The string can contain 
0-8 EBCDIC characters. Cne 
internal quote must be represented 
by two. (Job control removes one 
of them when setting the value.) 
The surrounding quotes are not 
included and the length of 
$SYSPARM is determined by the 
resulting string. 

This operand is invalid if SYSPARM 
support was not specified when the 
system was originally generated. 

The options specified in the OPTION 
statement remain in effect until a contrary 
option is encountered or until a JOB 
control statement is read. In the latter 



The PAUSE statement causes a pause 
immediately after processing this 
statement. 

The PAUSE command causes a pause at the 
end of the current jcb step. 

The PAUSE statement or command always 
appears on SYSLOG. If only a printer is 
available, the PAUSE statement or command 
is ignored. At the time SYSLOG is unlocked 
fcr message input, ycu can continue 
processing by pressing the END or ENTER 
key. 

JCS Format 

// PAUSE [any user comment] 

JCC Format 

PAUSE [any user comment] 

The PAUSE command normally causes job 
control processing to pause at the end of 
the current job step in the partition 
specified. Use of the optional operand 
causes job control processing to pause at 
end-cf-jcb in the partition specified. 
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AR Format 



JCS Forirat 



PAUSE 



BG' 

Fll 

F3> [,EOJ] 

F3! 

F<4 



SYS 
// RESET J FROG 
(ALL 
.SYSxxx 

JCC Forirat 



For the attention routine, if the first 
operand is omitted, BG is assumed. The EOJ 
operand must be preceded by a BG, Fl, F2, 
F3, or F4 operand. 

PRTY 

The PRTY (priority) command allows the 
operator (a) to display the priority 
sequence of the partitions in the system, 
which was set at system generation, or (b) 
to change that sequence. 

AR Format 

PRTY 



This format of the PRTY command displays 
the priority of all partitions on the 
device assigned to SYSLOG. 

PRTY [pl...,pn] 

This format of the command changes the 
priority of the partitions. The number of 
operands specified must coincide with the 
number of partitions in the system. The 
values of the operands are the partition 
identifiers EG, Fl, F2, F3, or F4. The 
order of operands indicates the new 
priority sequence,, in ascending order. For 
example 



PRTY 



BG,F3,F1,F2 



sets the background with the lowest, and 
foreground-two with the highest priority in 
a four-partition system. 

RESET 



[SYS 
RESET (PROG 
|ALL 
lSYSXxx J 



SYS 



PROG 



ALL 



SYSxxx 



ROD 



Resets all system lcgical units to 
their standard assignments. 

Resets all programmer lcgical 
units to their standard 
assignments . 

Resets all logical units to their 
standard assignments. 

Resets the logical unit specified 
to its standard assignment. SYSIN 
cr SYSOUT cannot be specified. 



The ROD ccirmand (Reccrd en Demand) updates 
all statistical data record (SDR) counters 
for all ncn-teleprocessing devices on the 
recorder file on SYSREC from the SDR 
counters in storage. The command must not 
be issued until all jebs in the partitions 
in an MPS environment have completed. The 
ROD command also initializes the writing of 
the RDE end-of-day (EOD) reccrd en SYSREC. 
The ROD command has nc operand. 

Note: This command must not be specified 
fcr a Model 115 or 125 that is generated 
without software recording. 

JCC Format 



ROD 



RSTRT 



The RESET command or statement (Reset I/O 
Assignments) resets temporary I/O 
assignments to the standard assignments in 
the partition in which RESET was submitted. 
The standard assignments are those 
specified when the system is generated, 
plus any modifications made by the operator 
via an ASSGN command without the TEMP 
option. 

When the physical device affected by 
RESET is a magnetic tape drive, the current 
mode set in the PUB table is set to the 
standard mode set for the device. The 
standard mode set is established at IPL 
time and is modified by a permanent ASSGN 
with an X'ss' parameter. 



The RSTRT statement (Restart Checkpointed 
Program) is available for checkpeinted 
programs. A programmer can use the CHKPT 
macrc instruction in his program to write 
checkpoint records. The maximum number of 
checkpoints that can be taken is decimal 
9999. The checkpointed information 
includes the registers, tape-positioning 
information, a dump of the program, and a 
restart address. 

The restart facility allows the 
programmer to continue execution of an 
interrupted job at a pcint other than the 
beginning. The procedure is to submit a 
group of jcb control statements including a 
restart (RSTRT) statement. 
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JCS Format 

// RSTRT SYSxxx, nnnnt, filename] 

SYSxxx Symbolic unit name of the device 
on which the checkpoint records 
are stored. This unit must have 
been previously assigned. 

nnnn Identification of the checkpoint 
record to be used for restarting. 
This serial number is four 
characters. It corresponds to the 
checkpoint identification used 
when the checkpoint was taken. 
The serial number is supplied by 
the checkpoint routine, and 
printed on SYSLOG when the 
checkpoint is taken. 

filename Symbolic name of the disk 

checkpoint file to be used for 
restarting. It must be identical 
to the filename of the DTFPH to 
describe the disk checkpoint file 
and the fifth parameter of the 
CHKPT macro instruction. This 
operand applies only when 
specifying a disk as the 
checkpoint file. 

See DQS/VS Supervisor and I/O Macros, 
GC33-5373, for further details on the CHKPT 
macro instruction. 

When a checkpoint is taken, the 
completed checkpoint is noted on SYSLOG. 
Restarting can be done from any checkpoint 
record, not just the last. The jobname 
specified in the JOB statement must be 
identical to the jobnarre used when the 
checkpoint was taken. The proper I/O 
device assignments must precede the RSTRT 
control statement. 

Assignment of input/output devices to 
symbolic unit names may vary from the 
initial assignment. Assignments are made 
for restarting jobs in the same manner as 
assignments are made for normal jobs. 
Care must be taken that a real-mode program 
is restarted in a real partition and a 
virtual-mode program in a virtual 
partition. 



SET 

The SET comman 
configuration, 
lines to be pr 
the remaining 
SYSPCH is assi 
the system the 
on SYSREC used 
support record 
sets the syste 
the hard copy 
console (DOC), 



d initializes the UPSI 

specifies the number of 
inted on SYSLST, specifies 
disk capacity when SYSLST or 
gned to disk, and defines to 
status of the recorder file 
by the recovery management 
er (RMSR) features. It also 
m date, defines the status of 
file for the display operator 
defines a new size for the 



SVA, and specifies an SDL in the SVA. The 
SET card should precede the JOB card in job 
control sequence. 

Note; RCPCH and RCLST operands are ignored 
if SYSLST cr SYSPCH is assigned to a 3540 
diskette. 

JCC Format 

SET [UPSI=nl] [,LINECT=n2] [,RCLST=n3] 

t,RCPCH=n4] [,RF=n5] [,DATE=n6] [,HC=n7] 
[,SVA=n8] [,SDL=n9] 

UPSI=nl Sets the bit configuration of the 
UPSI byte in the communications 
region. nl consists of one to 
eight digits, either 0, 1, or X. 
Positions containing are set to 
0; positions containing 1 are set 
tc 1; positions containing X are 
unchanged. Unspecified rightmost 
positions are assumed tc be X. 

LINECT=n2 

Sets the standard number of lines 
tc be printed on each page of 
SYSLST. n2 is an integer between 
30 and 99. 

RCLST=n3 n3 is a decimal number indicating 
the minimum number cf records 
remaining to be written on SYSLST 
when assigned to disk before a 
warning is issued tc the operator 
that the capacity of the extent is 
near. It may be any decimal 
number from 100 through 65535. 

Note: This warning is issued only 
between jobs. If the extent 
limits are exceeded before the 
jcb, this jcb is terminated. 

If no value is given, the system 
sets RCLST equal to the value 
specified in the SYSFIL parameter 
when the system was generated. If 
nc value was specified, the system 
sets RCLST equal to 1000. 

RCPCH=n4 n4 is a decimal number indicating 
the minimum number cf records 
remaining to be written on SYSPCH 
when assigned tc disk before a 
warning is issued to the operator 
that the capacity of the extent is 
near. It may be any decimal 
number from 100 through 65535. 

Note: This warning is issued only 
between jobs. If the extent 
limits are exceeded befcre the 
jcb, this jcb is terminated. 

If no value is given, the system 
sets RCPCH equal to the value 
specified in the SYSFIL parameter 
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when the system was generated. If 
no value was specified, the system 
sets RCPCH equal to 1000. 



YES Indicates that a hard-copy 
file exists in the system and is 
opened as seen as the first JOB 
statement is read. 



RF=n5 Defines to the system the status 
of the recorder file (IJSYSRC) on 
SYSREC used by the recovery 
management support recorder (RMSR) 
feature. May only be specified 
after IPL before the first JOB 
card. 

Note that a SET RF command is 
ignored if it is given for a Model 
115 or 125 without software 
recording. 

n5 can be: 

YES Indicates that an active 
recorder file exists. The system 
opens this file when the first JOB 
card is encountered. 

CREATE Instructs the system to 
create a recorder file when the 
first JOB card is encountered. 

DATE=n6 Sets the system date permanently 
to the specified value. The 
system date in the communications 
region of each partition is reset 
to reflect the new value. This 
subsequently resets the JOB date 
when a new job is run. n6 can 
have the following formats: 

mm/dd/yy 
dd/mm/yy 

mm specifies the month; dd 
specifies the day; yy specifies 
the year. The format to be used 
is the format that was selected 
when the system was generated. 

The DATE parameter may only be 
specified if the TOD clock is not 
supported in the system cr if the 
clock is not operational. 

HC=n7 Defines to the system the status 
of the hard-copy file (IJSYSCN) 
on SYSREC, used to produce hard 
copy of text that appears on the 
screen of the Display Operator 
Console for Model 115 or 125. 
Each line written on the screen, 
either by the system or by the 
operator, is written into 
IJSYSCN. 

n7 can have the following values: 



YES 
NO 
, CREATE) 



NO Indicates that no 
recording is to be performed on 
the hard-ccpy file. 

CREATE Instructs the system to 
create a hard-copy file; the file 
is created and opened as soon as 
the first JOB statement is read. 

SVA=n8 Allows the user to change the SVA 
allocation specified at 
supervisor generation time. The 
format of n8 is (nK,nK). The 
first parameter specifies the 
size of the SVA (shared virtual 
area), including the SDL (system 
directory list) , and the system 
GETVIS area. This size should be 
an even value and at least 64K. 
The second parameter specifies 
the size of the system GETVIS 
area. This size should be a 
multiple of 2K and smaller than 
the size of the SVA. SET SVA may 
only be specified as the first 
statement after IPL (or as the 
first statement of the first 
procedure) . 

SDL=n9 The specification of n9 is 

CREATE, which causes jcb control 
to build a system directory list 
in the SVA. It can also make it 
possible to load phases into the 
SVA. SET SDL may only be 
specified after SET SVA cr as the 
first statement after IPL. SET 
SDL will net be accepted in a 
single-partition system. 

To build the SDL, jcb control 
reads the phasenames that should 
go into the SDL. These should be 
specified in subsequent state- 
ments each having the following 
format: 

phasename[,SVA3 

in which SVA indicates that the 
phase is tc be placed in the 
shared virtual area if the phase 
is SVA-eligible. Each entry is 
34 bytes long and a maximum of 
32K bytes can be entered into the 
SDL. When this number is 
exceeded, no mere phasenames are 
accepted and a message is issued 
to the operator. The last of the 
phasenames is indicated when a /* 
statement is encountered. The 
SET SDL command, phasenames, and 
/* can be placed in a procedure. 
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Refer to DOS/VS System 
Generation, GC33-5377, for 
details on the IBM SDL procedures 
distributed with the system. 

If the requested phase is not 
present in the system core image 
library, a dummy entry is created 
that is filled when the specific 
phase is cataloged. 



START 

The START command (Start or Continue 
Processing) can be used to start or 
continue processing in the specified 
partition. The function of the START 
command is exactly the same as that of the 
BATCH command. 



AR Format 



START 



BG 



F1-F4 



BG 
Fl 
F2 
F3 
l_F4 J 



Job control reads the next control 
statement from SYSLOG. 

Specifies that an inactive fore- 
ground partition or a foreground 
partition that has been stopped by 
a STOP command is to be restarted. 
See also the BATCH command. 



TLBL 

The TLBL (Tape Label Information) statement 
replaces the VOL and TPLAB statement 
combination. It contains file label 
information for tape label checking and 
writing. (Programming support fcr the 
previous VOL and TPLAB combinations 
continues.) The TLBL statement may be used 
with both EBCDIC and ASCII files. For 
ASCII file processing, the fcurth and fifth 
operands are called set identifier and file 
section number, respectively. Fcr detailed 
information about TLEL refer to DOS/VS Tape 
Labels, GC33-5 37 4. 



JCS Format for EBCDIC Files 



// TLBL filename, ['file-id' ], [date] , 
[file-serial-number] , 
[volume-sequence-number] , 
[file-sequence-number] , 
[generation-number] , 
[version-number ] 



JCS Format for ASCII Files 



// TLBL filename, [' file-id' ], [date] , 
[set-identifier] , 
[file-section-number] , 
[file-sequence-number] , 
[generation-number] , 
[version-number] 



STOP 

The STOP command (Stop Processing) 
indicates that there are no more jobs to be 
executed in the partition in which the 
command is given. It cannot be used in a 
single-partition system. 

JCC Format 

STOP 

This command removes the partition from the 
system's task selection mechanism. Job 
control remains in the partition and can be 
activated by the START or BATCH attention 
routine command. 



filename 



Notes: 



It may sometimes be advisable to use a 
STOP command instead of a PAUSE 
command. The PAUSE command issues a 
read to SYSLOG, tying r it up until the 
operator responds. 

The STOP command can be used instead of 
the combination of HOLD and UNEATCH 
commands. 



This can be from one to seven 
alphameric characters, the first 
of which must be alphabetic. Thi: 
unique filename (within the 
program) is identical tc the 
symbolic name of the program DTF 
that identifies the file. 



•file- ID' 



date 



One to seventeen alphameric 
characters, contained within 
apostrophes, indicating the unique 
name associated with the file on 
the volume. This operand may 
contain embedded blanks. On 
output files, if this operand is 
omitted, "filename" is used. On 
input files, if the operand is 
omitted, no checking will be done. 

Output Files: A one tc four 
numeric character retention period 
in the format d thrcugh dddd 
(0-9999) can be specified. If 
emitted, a retention period is 
assumed. The current system date 
is always used as the creation 
date for output files. 
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Input _ Files: A four to six 
numeric character creation date in 
the format yy/ddd (99/365) can be 
specified (ddd can be froir 1-365). 
If omitted or a retention date is 
specified, no checking is done for 
input files. 

file serial number (EBCDIC) or 

set identifier (ASCII) 

One to six alphameric characters 
indicating the voluire serial 
number of the first (or only) reel 
of the file. All six characters 
must be specified for ASCII files. 
For EBCDIC files, if fewer than 
six characters are specified, the 
field is right justified and 
padded with zeros. If this 
operand is omitted en output, the 
volume serial number of the first 
(or only) reel of the file is 
used. If the operand is omitted 
on input, no checking is done. 

volume sequence number (EBCDIC) or 

file section number (ASCII) 

One to four numeric characters in 
ascending order for each volume of 
a multiple volume file. This 
number is incremented 
automatically by OPEN/CLOSE 
routines as required. If this 
operand is omitted on output, 
BCD 0001 is used. If omitted on 
input, no checking is done. 

file sequence number 

One to four numeric characters in 
ascending order for each file of a 
multiple file volume. This number 
is incremented automatically by 
OPEN/CLOSE routines as required. 
If omitted on output, BCD 0001 is 
used. If omitted on input, nc 
checking is done. 

generation number 

One to four numeric characters 
that modify the file ID. If 
omitted on output, BCD 0001 is 
used. If omitted on input, no 
checking is done. 

version number 

One or two numeric characters that 
modify the generation number. If 
omitted on output, BCD 01 is used 
for EBCDIC files, and BCD 00 for 
ASCII files. If omitted on input, 
no checking is done. 

TPLAB 

The TPLAB (Tape Label Information) 
statement, which can be used for both 
EBCDIC and ASCII files, contains file label 
information for tape label checking and 



writing. It must immediately fcllcw a 
volume (VOL) statement. The TPLAB 
statement contains an image of a portion 
of the standard tape file label. Label 
fields 3-10 are always included just as 
they appear in the label. These are the 
only fields used for label checking. The 
additional fields (3-13) can be included, 
if desired. Field 12 (block count) always 
defaults tc zeros. Field 12 (blcck count) 
always defaults to zeros. If specified for 
an output file, they are written in the 
corresponding fields of the output label. 
They are ignored when used fcr an input 
file. DOS/VS Tape Labels, GC33-5374, 
contains additional information about 
TPLAB. 



JCS Format 



// TPLAB 



•label-fields 3-10' 
'label fields 3-13* 



•label fields 3-10' 

This is a 4 9-byte character 
string, included within 
apostrophes (8-5 punch), identical 
tc positions 5-53 of the tape file 
label. These fields can be 
included in cne line. 

•label fields 3-13' 

This is a 6 9-byte character 
string, included within 
apostrophes (8-5 punch), identical 
tc positions 5-73 of the tape file 
label. These fields are too long 
tc be included en a single line. 
The character string must extend 
into column 71, a continuation 
character (any character) is 
present in column 72, and the 
character string is completed on 
the next line. The continuation 
line starts in column 16. 



UCS 



The UCS command (Load Universal Character 
Set Buffer) causes the 240-character 
Universal Character Set contained in the 
core image library phase specified by 
phasename to be loaded as buffer storage in 
the IBM 2821 Control Unit. The 240 EBCDIC 
characters correspond to the 240 print 
positions on 1403 chains and trains. A 
character sent to the printer fcr printing 
is matched against the characters in the 
UCS buffer. When a match occurs, the 
corresponding chain/train character is 
printed in the print-line position that the 
output character occupied. Thus, through 
the UCS buffer and the many chains/trains 
available, the 1403 Printer can be adapted 
to many variable printing applications. 

The logical unit must be assigned to an 
IBM 14 03 Printer with the UCS feature. It 
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) 



is the user's responsibility tc assemble, 
link-edit, and catalog his UCS buffer 
phases into the core image library, and to 
mount the new chain or train before the UCS 
command is executed. The UCS command is 
not logged on SYSLST. 



JCC Format 

UCS SYSxxx,phasename[,FOLD] [, BLOCK] 
[„ NULMSG] 

SYSxxx The name of the logical unit 

assigned to a 1403 UCS printer to 
be loaded. 



phasename 

The symbolic name of the core 

image library phase containing the 

2 40 EECDIC characters to be 

loaded, followed by an 

8 0-character verification message. 

Each phase may have any valid 

phasename. 

FOLD Signifies that the buffer is to be 
loaded with the fold ing operation 
code in the CCW to permit printing 
either uppercase or lowercase bit 
configurations. 

BLOCK Signifies that the 2821 latch is 
to be set to inhibit data checks 
generated by the 1403 UCS Printer 
because of print line character 
mismatches with the UCS buffer. 

NULMSG Signifies that the 80-character 

verification message is not to be 
printed on the 1403 after the 
buffer is loaded. If this 
parameter is not specified after 
the UCS buffer has been loaded, 
the program skips tc channel 1, 
issues a print of the last 80 
characters in the phase specified 
by the first parameter, and again 
skips to channel 1. This is to 
identify the phase, if the 
phasename is incorporated in the 
verification message. If a 
chain/train can be identified by a 
unique character, this message can 
also be used to verify that the 
mounted chain or train is 
compatible with the UCS buffer 
contents, by including this unique 
character in the verification 
message. 

The UCS phase format is: 

r t 1 

| 240-character | 80-character | 
| UCS buffer load j verification | 
| | message | 



UNBATCH 

The UNEATCH command terminates foreground 
processing and releases the partition. 
UNEATCH is accepted only when no job is in 
process in the partition and only from 
SYSLCG. The operator can gain command of 
SYSLOG following a PAUSE or STOP command or 
a PAUSE statement. All tape or disk system 
I/O files must have been closed. Following 
the UNBATCH command, the attention routine 
accepts EATCH or START commands for the 
affected partition. UNBATCH permits 
storage allocation fcr the partition to be 
reduced. This command is valid cnly for 
foreground partitions. 

JCC Format 

UNBATCH 



UPSI 

The UPSI (User Program Switch Indicators) 
statement allows you tc set program 
switches that can be tested. It has the 
following format. 

JCS Format 

// UPSI nnnnnnnn 

The operand consists of one to eight 
characters of 0, 1, or X. Positions 
containing are set to 0. Positions 
containing 1 are set tc 1. Positions 
containing X are unchanged. Unspecified 
rightmost positions are assumed tc be X. 



Job control 
zeros before r 
each jcb. Whe 
statement, it 
the UPSI byte 
Left to right 
digits ccrresp 
the UPSI byte, 
eight bits can 
programs at ex 

VOL 



clears the UPSI byte to 
eading control statements for 
n jcb control reads the UPSI 
sets or ignores the bits of 
in the communication region, 
in the UPSI statement, the 
end to bits through 7 in 
Any combination of the 

be tested by problem 
ecution time. 



The VOL statement (Volume Information) is 
used when standard labels for a EASD or 
tape file are checked unless the DLBL or 
TLBL statements are used. A VOL statement 
must be used for each file on a irultifile 
volume (when the DLAE or TPLAB statements 
are used). The VOL, TFLAE or VOL, DLAB, 
XTENT statements must appear in that order 
and must immediately precede the EXEC 
command or statement to which they apply. 

The VOL statement, in comtinaticn with 
the DLAB and XTENT statements, should not 
be used tc supply label and extent 
information for the 3330/3333 or 3340. 
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JCS Format 

// VOL SYSxxx, filename 



SYSxxx 



filename 



Symbolic unit name. The symbolic ' 
unit name is taken from the XTENT 
statement. 



This can be from one to seven 
alphameric characters, the first 
of which must be alphabetic. This 
unique filenarre is identical to 
the symbolic name of the program 
DTF that identifies the file. 



XTENT 

The XTENT statement (DASD Extent 
Information) defines each area, or extent, 
of a DASD file. One or more XTENT 
statements must follow each DLAE statement. 

The XTENT statement, in combination with 
the DLAB and VOL statement, should not be 
used to supply label and extent information 
for the 3330/3333 or 3340. The XTENT 
statement cannot be used for VSAM files. 



JCS format 

// XTENT type, sequence, lower, upper, 
'serial no. ', SYSxxx [B 2 ] 

type Extent Type. One or three 
columns, containing: 

1 = data area (no split 

cylinder) 

2 = overflow area (for indexed 

sequential file) 

4 = index area (fcr indexed 
sequential file) 

128 = data area (split cylinder) . 
If type 128 is specified, 
the lower head is assumed to 
be HiH 2 H 2 in lower, and the 
upper head H ± H 2 H 2 in u pper . 



sequence 



Extent Sequence Number . One to 
three columns, containing a 
decimal number from to 255, 
indicating the sequence number of 
this extent within a rrultiextent 
file. Extent sequence is used 
for the master index of an indexed 
sequential file. If the master 
index is not used, the first 
extent of an indexed sequential 
file has sequence number 1. The 
extent sequence for all other 
types of files begins with 0. 



lcwer Lcwer Limit c f Extent . Nine 

columns, containing the lowest 
address of the extent in the form 
E 1 C 1 C 1 C 2 C 2 C 2 H 1 H 2 H 2 , where: 

E-l = initially assigned cell 
number . 

for disk 

to 9 for data cell 

C^Ci = subcell number. 

00 for disk 

00 to 19 fcr data cell 

C 2 C 2 C 2 = cylinder number. 

000 to 199 for disk 
or 

strip number: 

000 to 009 for data cell 

Ha. = head block position. 

for disk 

to 4 fcr data cell 

H 2 H 2 = head number 

00 to 09 for 2311 

00 to 19 fcr 2321, 2314, 

2319, 3330/3333, 3340. 

Although a part cf the address 
(such as Bj_ or C 2 C 2 C 2 ) can be 
zero, a lower extent cf all zeros 
is invalid. 

Note : The last four strips of 
subcell 19 are reserved for 
alternate tracks for 2321. 

upper Upper Limi t of Exte nt. Nine 

columns containing the highest 
address of the extent, in the same 
form as the lcwer limit. 



4 



' serial no. ' 

Volume Serial Number. 



This is a 



six-byte alphameric character 
string, contained within 
apostrophes. The number is the 
same as in the volume label 
(volume serial number) and the 
Format 1 label (file serial 
number) . 

SYSxxx This is the symbolic address cf 
the DASD drive. 

B 2 Currently assigned cell number. 

for disk 

0-9 for data cell 



( 
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This field is optional. If 
missing, job control assigns 
B i =E 2 . 



ZONE 



J 



The ZONE statement initializes the value of 
the job zone field in the communication 
region (bytes 143 and 144) . If no ZONE 
statement is supplied, job control supplies 
the zone given in the system zone field in 
the communication region extension (bytes 
68 and 69). If no DATE statement is 
supplied, the job date is updated by means 
of the values given in the systeir date 
field and in the ZONE statement. 

Locations that are on Greenwich Mean 
Time need not specify the ZONE statement or 
can specify 

// ZONE EAST/00/00 or 
// ZONE WEST/00/00 

JCS_Format 

// ZONEJEASTl /hh/mm 
(WEST 

EAST A geographical position east of 
Greenwich. 

WEST A geographical position west of 
Greenwich. 



As a special delimiter statement, /+ is 
neither logged nor listed when retrieving a 
cataloged procedure for inclusion in the 
job input stream. Instead, the following 
message appears: 

EOP procedurename 

The /+ statement is punched and/cr listed 
only when a procedure is processed by the 
PSERV program. 



/♦ — END-CF-DATA FILE 

The End-cf-Data File statement must be the 
last statement of each input data file on 
SYSRDR and SYSIPT. 

JCS Format 



/* 



Columns 1 and 2 contain a slash (/) and an 
asterisk (*). Column 3 must be tlank. /* 
causes the channel scheduler to post the 
end-cf-file indicator in the user's CCB. 
Logical ICCS also recognizes /* when a card 
reader is assigned to the symbolic units 
SYSOOO-SYSrnn. 

Not e: For an input file en an IEM 5425 
MFCU, the /* card must be followed by a 
tlank card. 



> 



hh/mm A decimal value that indicates the 
difference in hours and minutes 
between local time and Greenwich 
Mean Time, hh may be in the range 
0-12, mm in the range 0-59. 

This statement is only accepted if 
time-of-day clock support is included in 
the system. Otherwise, the message ISOnD 
INVALID STATEMENT appears on SYSLOG and 
SYSLST. 

/ + — END-OF-PROCEDURE 

The End-of -Procedure statement is /+, 
unless you specify a different 
end-of-procedure statement as indicated in 
the EOP parameter of the CATALP statement. 
This statement is valid only for cataloged 
procedures and must be the last statement 
of each procedure to be cataloged. (Fcr 
information on the EOP parameter, refer to 
the CATALP statement in the section 
Procedure Library: Maintenance and Service 
Programs.) 

JCS Format 

/+ [comment] 

Columns 1 and 2 contain a slash (/) and a 
plus (+). Column 3 must be blank. 



/S — END-CF-JOB 

This End-of-Job statement must be the last 
statement cf each jot. 

JCS Format 

/& [comments] 

Columns 1 and 2 contain a slash (/) and an 
ampersand (6) (12-punch) . Column 3 must be 
blank. Upon occurrence cf /£, the channel 
scheduler posts an end-cf-file indicator in 
the user's CCB. If the user attempts to 
read past the /S en SYSRER or SYSIPT, the 
job is terminated. Any comments can begin 
in column 14 and are printed at end of job. 
If a job updates a system directory, 
comments included on the /6 statement are 
not printed. 

If time-of-day clock support is 
provided, the end-cf-jcb statement is 
printed on SYSLST in the following format: 
columns 1-3 contain EOJ, columns 5-12 the 
job name columns 14-72 blanks or any user 
comments, and columns 73-118 the date, 
time-of-day, and job duration in the 
following format: 

EATE rrm/dd/yy, CLOCK hh/mm/ss, 
DURATION hh/mm/ss 
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On SYSLOG, the date,, time of day, and job 
duration (the amount of time elapsed 
between the start and the end of a job) 
appear in the same format, occupying 4 6 
positions, on the line following the 
end-of-job statement. 

If time-of-day clock support is part of 
your system, the zone and date values are 
reset every time this statement is 
encountered. 

Note: The stop time that the job 
accounting routines stores in byte 4 of 
the Job Accounting Table is calculated from 
the values in storage locations 80 and 84. 

End-of-job information is net printed on 
SYSLST if // OPTION NOLOG has been 
specified. (The NOLOG statement itself is 
logged on SYSLST) . 

* — COMMENTS 

This statement can be used as a job control 
comments statement. 

JCS Format 



* any user comments 



2 is 



Column 1 contains an asterisk. Column 
blank. The remainder of the statement 
(through column 72) contains any user 
comments. The content of the comment 
statement is printed on SYSLCG. If 
followed by a PAUSE statement, the 
statement can be used to request operator 
action. 



JOB CONTROL STATEMENT EXAMPLE 



Figure 6 contains six examples cf job 
control statement input. In the discussion 
that follows, each point corresponds tc the 
number at the left of the two slashes in 
the job control statements. The PHASE, 
INC1UDE, and ENTRY statements are linkage 
editor control statements. These 
statements are described in detail in the 
section Linkage Editor. They are included 
in this discussion to present a more 
meaningful example. 

1. JOB statement for first example. 

2. ASSGN statement for the disk with 
volume serial number 231402. 

3. DLEL and EXTENT statements to define 
ISAM file to be created. 

4. EXEC statement for a program in the 
system core image library to be 
executed in virtual mode. 



5. End-cf-job indicator. All temporary 
symbolic unit assignments reset to the 
permanent assigns. 

6. JOB statement for example 2. 

7. ASSGN statements fcr 3330 disks and 
tape. 

8. DLBL and EXTENT statements tc define a 
sequential disk file with twe extents 
on separate 3330 volumes. 

9. EXEC statement fcr a program in the 
system core image library that is to be 
executed in REAL mede, using 60K of the 
real storage allocated tc EGR. 

10. MTC (Magnetic Tape Command) to rewind 
and unload the tape just created. 

11. Message to operator cencerning the 
tape. 

12. End-of-job indicator. 

13. MAP command to print a map of real and 
virtual storage allocations en SYSLOG. 

14. JOB statement for example 3. 

15. ASSGN statements to release previous 
tape assignment, and temporarily assign 
SYSPCH to that tape. 

16. OPTION .statement tc specify options 
that are different from those 
established at System Generation. 

17. CATALR statement that will be 
transferred by Job Control tc the 
SYSPCH file (tape en 380). This tape 
can then (after creation of the object 
deck) be used as input tc the MAINT 
program to catalog to the relocatable 
library. 

18. EXEC statement fcr the system 
assembler. 

19. Source deck as input to the system 
assembler and /* (end-of-data) . 

20. MTC commands to write a tapemark and 
rewind the tape on 381. This tape is 
now positioned for use as SYSIPT. 

21. RESET statement causes SYSPCH to revert 
to its permanent assignment. 

22. Temporary assignment of SYSIPT to tape 
381 fcr use by the librarian program 
MAINT. 

23. EXEC statement for MAINT. 

24. MTC command to rewind and unload tape 
en unit 381. 



f 

I 



( 
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25. End-of-job indicator with a comment. 
SYSIPT returns to its permanent 
assignment. 



26. JOB statement for example 4. 

27. Permanent assignment of private core 
image library to 3330 on unit 110. 

28. OPTION statement to specify the CATAL 
function is to take place. 

29. PHASE and INCLUDE statements that are 
input to the linkage editor. The first 
INCLUDE statement calls the module 
previously cataloged in the relocatable 
library and the second (with a blank 
operand) is followed by an object deck 
to be included. 

30. /* indicates the end of the object 
deck, not the end of input to the 
linkage editor. 

31. ENTRY statement input to the linkage 
editor specifying an entry point for 
the PHASE PROGX03. 

32. EXEC statement for the linkage editor. 



33. Permanently unassigns the private core 
image library. 



34. End-of-job indicator. At this point 
the name of the phase cataloged is 
entered into the private cere image 
library directory. 

35. JOB statement for example 5. 

36. EXEC statement using cataloged 
procedures . LIBMAINT is a set of JCL 
and SYSIPT input in the Procedure 
Library. 

37. End-cf-job indicator. 

38. JOE statement for example 6. 

39. ASSGN statement for SYSLST, which may 
be any printer. 

40. SYS004 should be assigned to a tape on 
X'380', or X'381' (if X'380' is net 
available), or X'382' (if X'381* is not 
availatle) . 

41. Assign SYS005 and SYS004 (described in 
40). 
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9 

10 
11 

12 

13 

14 



15 
16 
17 
18 
19 

20 

21 
22 
23 
24 
25 

26 
27 
28 

29 



30 
31 
32 
33 
34 

35 
36 
37 
38 
39 
40 
41 



// JOB B7 9ISF LOAD ISAM FILE 

// ASSGN SYS005, DISK, VOL=231402 ISAM BACKUP MASTER — PREMOUNTED PACK 

// DLBL LOADIS, ' FILE 8 685* ,, ISC 

// EXTENT SYS005, 231402, 4,1, 200,20 

// EXTENT SYS005, 231402,1, 2, 300, 360 

// EXEC IS00F 

/S 

// JOB U81SDC UNLOAD SEQUENTIAL DISK TO TAPE 

// ASSGN SYS00 4,X , 111 , INPUT MASTER FILE 

// ASSGN SYS005,X'112* (2 EXTENTS) 

// ASSGN SYS 006, X' 380' ,X'C8' BACKUP TAPE DUAL DENSITY 9-TRACK 

// DLBL SDUNLD, ' SEQUENTIAL FILE' , 73/2 06 , SD 

// EXTENT SYS004, 333002, 1,0, 1900, 380 

// EXTENT SYS005, 333003, 1,1, 76,570 

// EXEC SD008,REAL,SIZE=60K RUN IN REAL USING 60K 

// MTC RUN,X'380' 

* OPERATOR - TAPE ON 38 - LAEEL, REMOVE RING 

* AND RETURN TO LIBRARY 
/£ 

* CREATE A MAP OF STORAGE ON SYSLOG 
MAP 



// JOB R61ASSM 

* 

ASSGN SYS012,UA 

// ASSGN SYSPCH, X' 381' 



OBJECT DECK TO TAPE - CATALOG IN 
RELOCATABLE LIBRARY 
CLEAR PREVIOUS TAPE ASSIGN 
ASSIGN SYSPCH TC TAPE 



// OPTION DECK, LIST, XREF,NOEDECK 

CATALR MOD207 
// EXEC ASSEMBLY 

(ASSEMBLER SOURCE HERE) 
/* 

// MTC WTM, SYSPCH, 02 WRITE TAPEMARK AND 

// MTC REW, SYSPCH REWIND SYSPCH TAPE 

// RESET SYSPCH 

ASSGN SYSIPT,X'381' , TEMP TO READ MODULE PRODUCED AEOVE — TEMP ASSGN OVERRIDE 
// EXEC MAINT 

MTC RUN, X' 381' UNLOAD/REWIND SYSIPT 
/g EOJ R61ASSM 



// JOB K13CATL 
ASSGN SYSCLB,X'110' 
// OPTION CATAL 

PHASE PROGX03,* 

INCLUDE MOD207 

INCLUDE 

(OBJECT DECK INCLUDED HERE) 
/* 

ENTRY MD207B 
// EXEC LNKEDT 
ASSGN SYSCLB,UA 
/£ 



LINK MODULES INTO A 
PRIVATE CORE IMAGE LIERARY 



CATALOGED PROCEDURE FCR LIBRARY MAINTENANCE 



// JOE E3 9MANT 

// EXEC PROC=LIBMAINT 

/£ 

// JOB E4 

// ASSGN SYSLST, PRINTER ASSIGN SYSLST TO ANY PRINTER 

// ASSGN SYS004, (X ' 380 ' , X * 381 ' , X ' 382 ' ) ASSIGN SYS004 TO A TAPE WITHIN THIS RANGE 

// ASSGN SYS005,SYS004 ASSIGN SYS005 AS SYS004 

// EXEC MYPROG 

/£ 



Figure 6. Job Control Statement Examples 
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POWER 



> 



POWER is an automatic SYSIN/SYSPCH/SYSLST 
spooling processor and priority scheduler 
for DOS/VS. Using one or ircre IBM 2311, 
2314, 3330, or 3340 disk drives for 
intermediate storage, POWER can operate up 
to 26 peripheral devices, maintaining 
read/punch/print strearrs fcr up tc four 
partitions. 

This section describes the POWER job 
entry control language, the central 
installation console commands, and the 
POWER RJE (Remote Job Entry) terminal 
commands. 

A summary of all POWER statements and 
commands is contained in Appendi x C . 



Note that the names ALL, CLASS, FREE, 
HOLD, LOCAL, and Pn (where n is any number 
frcrr thrcugh 9) must net be used for job 
entries because they may cause ccnflicts in 
the use cf certain POWER ccmirands. 



FUNCTION CF JECL STATEMENTS 

JECL allows you to specify how PCWER is to 
handle a particular jet entry. You may, 
for instance, use JECL statements for the 
f cllcwing : 

1. Under POWER and POWER RJE 

• assign priorities to determine the 
order in which the jot entries are 
started. 



JOB ENTRY CONTROL LANGUAGE (JECL) 



A job entry consists of all the input from 
a reader logged by POWER under a single 
name, and may comprise one cr mere DOS/VS 
jobs, or one or more DOS/VS job steps. In 
a writer-only POWER system, each jcb 
submitted must use POWER JECL. In a 
reader-writer POWER system, job entries may 
be created using either 

DOS/VS JCL (Job Control Language) , or 
POWER JECL (Job Entry Control Language). 

If JCL is used, a job entry is logged under 
the name specified in the // JOE statement. 
This statement and the /S statement mark 
the beginning and end of the job entry. 

If JECL is used, a job entry is logged 
under the name in the * $$ JCB statement. 
The * $$ JOE statement defines the 
beginning of the job entry, while its end 
is marked by a * $$ EOJ statement. 

Each job entry also receives a unique 
number. This number, together with the 
name, identifies the job entry if identical 
names are used. The operator must use the 
name and, possibly, the number of a 
particular job entry whenever he issues an 
operator command to control the processing 
of that job entry. 



• hold a job entry in a reader, 
printer, or punch queue. 

• speel output tc tape rather than to 
disk. 

• suppress spooling of unit record 
print or punch output. 

• specify the partition in which the 
job entry is to be executed. 

2. Under POWER RJE only 

• direct output tc another user or, on 
a read-only basis, to all terminal 
users. 

• direct output to be returned to a 
terminal or tc he processed locally 
at the central system. 

• hold output until an CUTPUT terminal 
ccirmand is issued. 



FORMAT OF JECL STATEMENTS 

JECL statements are entered as punched 
cards within the jcb stream. Each 
statement must be completely contained in 
one punched card; continuation cards are 
not permitted. The format of JECL 
statements is shown in Figure 7. 
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r T" 

Columns | 
1-4 I 



* $$ 



5-71 



I 72 | 



73-80 



Operation Field 



© 



Operand Field 

© 



Comments Field j 
I 



© 



Sequence Field 

© 



* $$ in columns 1 through 4 identify the card as a JECL statement. 



© 
© 



© 
© 



The operation field has no fixed length. It iray either directly fcllcw the second 
dollar sign or it may be separated from the second dollar sign by one or more 
blanks. At least one blank must be placed between the operation and the operand 
field. 

The operand field contains one or more positional parameters separated by commas. 
The parameters must be inserted in a specific order. If a parameter is omitted, 
its absence must be indicated by a comma. 

The operand field has no fixed length. A blank terminates the operand field; 
therefore, none of its parameters may contain embedded blanks. If trailing 
parameters are omitted, trailing commas may also be omitted. If the operation 
requires an operand field and no parameters are specified, the entire operand field 
may be omitted. If, in this case, a comment field is present, the omitted operand 
field is indicated by a comma preceded and followed by blanks. 

The comment field may contain any information and has no fixed length. 

The sequence field can contain up to eight characters of optional information used 
for control statement identification. It is not checked by POWER. 



Figure 7. Format of JECL Statements 



Because JECL statements begin with an 
asterisk (*), DOS/VS job control will treat 
the JECL statements as comments when POWER 
is not used. A * $$ RDR card, however, 
must be removed if it is net to be used. 
POWER removes the JECL statements, if used, 
from the job stream prior to job execution. 

Note: Some IBM-supplied program products 
process DOS/VS job control statements as 
input data. Jobs containing such data 
files should be enclosed by a * $$ JOB 
statement and by a * $$ EOJ statement. In 
this way, POWER is forced to handle it as 
one job entry. Jobs containing POWER JECL 
may never be used as data under POWER. 
Therefore, any use of JECL as data should 
take place when POWER is not running. 



DESCRIPTION OF JECL STATEMENTS 

Figure 8 lists all JECL statements in 
alphabetical order. This list is followed 
by a detailed description of each statement 
and its operands. Examples demonstrating 
the use of JECL statements are given at the 
end of this section. 



JECL 
Statement 



* $$ DATA 

* $$ EOJ 

* $$ JOE 

* $$ PRT 

* $$ PUN 

* $$ RDR 

* $$ SLI 



Function 



Inserts data from the input 

reader into a book in a source 

statement library. 

Indicates the end of a job 

entry. 

Indicates the beginning of a 

job entry and provides handling 

information. 

Provides disposition and 

handling information for 

printed output. 

Provides dispesition and 

handling information for 

punched output. 

Inserts a diskette file into 

the input stream from a card 

reader. 

Inserts data from a sublibrary 

into the job stream (from the 

input reader or the reader of a 

terminal) . 



Figure 8. JECL Statements 



( 
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/ 
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* $$ DATA S tatement 

The * $$ DATA statement is part of the SLI 
feature and may be used only if POWER was 
generated with the SLI (Source Library 
Inclusion) feature. The * $$ DATA allcws 
you to insert a deck of cards from the 
reader queue into a book that is retrieved 
from the source statement library by a 

* $$ SLI statement. The book must contain 

* $$ DATA cards at those points where the 
card decks from the reader queue are tc be 
inserted. POWER suspends reading from the 
source statement library as soon as it 
detects a * $$ DATA statement and checks if 
the next card in the reader queue is a 

* $$ DATA statement with the same name. If 
that * $$ DATA statement is found, the 
cards following the * $$ DATA statement in 
reader queue (but not the * $$ DATA 
statement itself) are passed tc the 
partition. Input from the reader queue is 
terminated when an * or /& jcb control 
statement is encountered. Source statement 
library inclusion is then resumed with the 
card image that follows the * $$ DATA 
statement in the library book. 



If POWER does not find a matching 
* $$ DATA statement in the reader queue, 
the * $$ DATA statement in the source 
statement library is ignored and source 
library inclusion is resumed immediately. 



Format 

* $$ DATA name 

name Specifies the name of the 

* $$ DATA statement in the reader 
queue. Must be identical with 
the name of the corresponding 

* $$ DATA statement in the source 
statement library. 

* $$ DATA statements must be preceded by a 

* $$ SLI statement or they are treated as 
comments. SLI update cards ($SLI in 
columns 73 through 76) and * $$ DATA cards 
may be used together. However, they must 
appear in the job stream in the same order 
as the corresponding card images appear in 
the source statement library (refer to 
Example 5 under "Examples of JECL 
Statements" in this section) . 



♦ $$ EQJ Statement 

The * $$ EOJ statement must be used to mark 
the end of a job entry whose beginning was 
defined by a * $$ JOB statement. Since a 
job entry consists of one cr mere entire 
job steps in one or more jobs, place it at 
the end of a DOS/VS job or jcb step. 



Format 

* $$ EOJ (no operand) 

* $$ JOB Statement 

The * $$ JCB statement marks the beginning 
cf a jcb entry and provides job entry 
handling information. A job entry that is 
started with a * $$ JOE statement must be 
terminated by a * $$ EOJ statement. 

Format 

* $$ JOB [name], [H] , [priority] , 

[partition] , (userid ) 
ALLUSERSJ 



name 



Specifies the name 
job entry is known 
the job entry ccnta 
EOS/VS jobs, they a 
unit in POWER ty th 
* $$ JOB statement, 
specify 'name' as a 
to eight characters 
which must be alpha 
'name' is net speci 
assigns AUTONAME as 
the job entry. 



by which the 
to POWER. If 
ins several 
re logged as a 
e name in the 
Ycu may 

string of one 
, the first of 
betic. If 
fied, POWER 

the name of 



priority 



Specifies that the jcb entry is 
to be held in the input queue 
until it is released by the 
operator with an R command. If H 
is not specified, the jcb entry 
is processed with ether job 
entries of the same priority on a 
first-in, first-cut tasis. 

Specifies the priority assigned 
to the job entry. It determines 
the order in which the job 
entries are started. ('priority' 
must not be confused with the 
PRTY parameter in the supervisor 
generation macrc FCPT, which 
indicates the desired dispatching 
priority of the partitions.) 
Specify a value from through 9 
as 'priority'. Nine is the 
highest priority. If 'priority' 
is emitted, POWER assigns to the 
job entry a default priority that 
is fcased on the POWER generation 
option PRIORTY. If POWER was 
generated with PRICRTY=NO, the 
•priority' parameter in a 
* $$ JOB statement is ignored. 



partition Specifies the FOWER-controlled 

partition tc which the jcb entry 
is assigned for execution. It is 
required only if the jcb entry is 
read in by a partition- 
independent reader or an RJE 
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routine. If the job entry is 
read in by a partition-dependent 
reader, the 'partition' parameter 
is ignored. Specify BG for the 
background partition and F4 # F3 f ' 
F2, or Fl for the various 
foreground partitions. If 
'partition' is omitted, the first 
partition specified in the 
POWPART parameter is assumed. 

userid Specifies the destination for the 
output when used in conjunction 
with .* $$ PRT and * $$ PUN 
statements. The specification is 
used only for RJE. The 
specification for 'userid' is 
valid only if it matches with a 
userid entry in your system. 

ALLUSERS ALLUSERS specifies that the 

output of the job entry vvill be 
available to all RJE users on a 
read-only basis. Cnly the 
central installation operator may 
purge job entries with the 
ALLUSERS destination. 

* $$ PRT State men t 

The * $$ PRT statement provides disposition 
and handling information for printed out- 
put. It must follow either the * $$ JOB or 
the *$$ PUN statement. Only one * $$ PRT 
statement is permitted for a job entry, and 
it pertains to all printed output 
intercepted by POWER for that jcb entry, 
even if the job entry consists of more than 
one DOS/VS job. Output from all the jcbs 
in the job entry is handled in accordance 
with the operands of the * $$ PRT 
statement. If a * $$ PRT statement is not 
included in the job entry, the default 
values of the operands are assumed. 



Format 



* $$ PRT [disposition[class] ] , 
[forms-number] 
, f~number-of-copies 
Ldevaddr-of-tape _ 
, [number-of-lines-bef ore-msg] 
, [linetab] 

disposition 

specifies the disposition of the 
printed output during and after 
execution of the job entry. Cne 
of the following options can be 
specified: 

D Spool output to disk. 

T Spool output tc tape. This 
option is valid only if POWER 
was generated with TAPE=YES. 



N Do not intercept print 

reguests. This specification 
suppresses spooling cf printed 
output. When such a job entry 
is executed, SYSLST must be 
assigned tc a real printer and 
not to a dummy device. (Do not 
assign SYSLST to a printer 
being used by a POWER print 
writer routine.) 

H Spcol output to disk and hold 
it until it is requested by 
means cf an R command (for 
output on a local printer) or 
an OUTPUT terminal command (for 
output on a terminal). 

R Return printed output to the 
terminal user. This option is 
used only for POWER with RJE. 

If 'disposition' is omitted, D is 
assumed as default value. 

class Specifies the class of the printed 
output after execution cf the job 
entry. You can specify any letter 
from A through Z. 'class' can be 
used in conjunction with 'forms- 
number' to grcup printed output by 
types. A print writer routine may 
then be started by class to 
process printed output cf the same 
type. 'class' is valid only if 
'disposition' is specified as D. 
It is ignored fcr output that is 
spooled to tape and for output 
that is directed to an RJE 
terminal. 

forms-number 

Specifies the type cf fcrms to be 
used and must be a string of one 
tc four alphameric characters. If 
'forms-number' is omitted, blanks 
are assumed as the form number. 
When the output cf the jcb entry 
is processed and its 'fcrms- 
number' is net the same as that of 
the previous job entry, a message 
is issued tc the operator to tell 
him that he has to change to forms 
cf the specified nuirber. After 
having changed the forms, the 
central installation operator must 
give a G command to continue 
processing. If the fcrirs were 
changed at the terminal printer, 
the terminal cperatcr must issue a 
CONTINUE command to continue 
processing. 

number-of- copies 

Specifies the desired number cf 
ccpies of printed output from the 
jcb entry. It is specified as a 
number of one or twe digits. If 



( 



( 
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' number-of-copies' is omitted or 
if it is specified as or 00, 
POWER produces one copy of the 
printed output for the jcb entry. 
' nurrber-of-copies' must be omitted 
if 'disposition' is specified as T 
or N. If additional copies are 
required when 'disposition' is T, 
start the tape writer as many 
times as copies are needed. 



devaddr-of-tape 

Is only used if 'disposition' is 
T. It specifies, in the format 
cuu, the channel and unit address 
of the tape drive tc be used for 
tape spooling when the job entry 
is being executed. If this 
parameter is omitted, the operator 
must specify the address at the 
console at execution time. If a 
job entry contains not only a 

* $$ PRT statement but also a 

* $$ PUN statement for tape 
spooling, each statement irust 
specify a different tape as 
'devaddr-of-tape' . 



number-of-lines-before-msg 

Is only used for disk spooling and 
specifies the number of print 
records that are intercepted by 
POWER before a warning message is 
sent to the central installation 
operator. The parameter is 
specified as a number of one to 
six digits. It overrides, for 
this job entry only, the value 
specified by the POWER generation 
option STDLINE. If 'number-of- 
lines-before-msg' is omitted, the 
value specified by STDLINE is 
used. 



linetab Specifies the carriage control 

tape format or the forms control 
buffer that allows the posting of 
channel 9 and 12 when print 
requests are intercepted by POWER. 
The parameter is specified as 2 6 
numeric characters and overrides, 
for this job entry only, the 
values specified by the POWER 
generation option LINETAE. If 
'linetab' is omitted, the values 
specified by LINETAE are used. If 
POWER was generated without the 
LINETAB option, 'linetab' is 
ignored. 



Specify 'linetab' in the form of 
dodid2d 3 d4d5d6d7d 8 d 9 di di id-i a 



where do to di 2 must be two 
numeric characters. 'di ' through 
'du' correspond to the punches in 
the forms control tape, or forms 
control buffer. Note that the 
'linetab' specification for the 
forms control buffer of a 3203, 
3211, or 5203 must correspond to 
the FCB load format. 

(Refer to the section "System 
Euffer Load (SYSEUFLD)" for a 
description of the FCB load under 
POWER.) 

With POWER, one channel can have 
only one punch per page, and the 
channel 12 punch must always be 
the last one on the page. 

The values of d through di 2 are 
calculated as follows : 

• d-, up to di 2 must be for 
each channel without punch. 
For a channel with punch, it 
must be the number of the line 
that contains a channel punch 
minus one. 

• d specifies the number of 
lines en the page that follow 
the line with the channel 12 
punch up tc the end cf the 
page. 

The total number of lines on a 
page is : 

do + d 12 + 1 

Note: It is advisable tc use the 
' forms-number ' pararreter in 
conjunction with the 'linetab' 
parameter. This will cause the 
writer routine to issue a message 
and pause, allowing the operator 
tc mount the correct carriage 
control tape. 



♦ $$ PUN Statement 

The * $$ PUN statement provides disposition 
and handling information for punched out- 
put. It must follow either the * $$ JOB or 
the * $$ PRT statement. Only cne * $$ PUN 
statement is permitted for a job entry and 
it pertains to all punched output 
intercepted by the POWER system for that 
jel entry, even if the jcb entry consists 
of more than one DOS/VS job. Output from 
all the jets in the jcb entry is handled 
in accordance with the operands of the 

* $$ PUN statement. If a * $$ PUN 
statement is not included in the job entry, 
the default values of the operands are 
assumed. 
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Format 



* $$ PUN [ disposition [class] ], [card-number] 
, ["number-of- copies! 
[_devaddr-of-tape J 
, [number-of-cards-before-msg] 



disposition 

Specifies the disposition of the 
punched output during execution 
and after execution of the job 
entry. One of the following 
options can be specified: 

D Spool output to disk. 

T Spool output to tape. This 
option is valid only if POWER 
was generated with TAPE-YES. 

N Do not intercept punch 

requests. This specification 
suppresses spooling of punched 
output. When such a jcb entry 
is executed, SYSFCH must be 
assigned to a real card punch 
and not to a dummy device. (Dc 
not assign SYSLST to a printer 
that is being used by a POWER 
print writer routine.) 

H Spool output to disk and hold 
it until it is released by 
means of an R command (for 
output on a local card punch) 
or an OUTPUT terminal command 
(for output on a terminal) . 

R Return punched output to the 
terminal user. This option is 
used only for POWER with RJE. 

If 'disposition' is omitted, D is 
assumed as default value. 



class Specifies the class of punched 

output after execution of the job 
entry. You can specify any letter 
from A through Z. 'class' can be 
used in conjunction with 
'card-number' to group punched 
output by types. A punch writer 
routine may then be started by 
class to process punch output of 
the same type. 'class' is valid 
only if 'disposition' is specified 
as D. It is ignored for output 
that is directed to an RJE 
terminal. 

card-number 

Specifies the type cf cards tc be 
used and must be a string of one 
to four alphameric characters. If 
'card-number' is omitted, blanks 
are assumed as the card number. 



When the output of the job entry 
is processed and its 'card-number' 
is not the same as that of the 
previous job entry, a message is 
issued to the operator to tell him 
that he has to change to cards of 
the specified number. After 
having changed the cards, the 
central installation operator must 
give a G command to continue 
processing. If the cards were 
changed at the terminal card 
punch, the terminal operator must 
issue a CONTINUE command to 
ccntinue processing. 



number-of- copies 

Specifies the desired number of 
copies of punched output from the 
jcb entry. It is specified as a 
number of one or two digits. If 
'number-of-ccpies ' is emitted or 
if it is specified as or 00, 
POWER produces cne copy of punched 
output for the job entry. 

* number-of-ccpies* must be omitted 
if 'disposition' is specified as T 
cr N. If additional copies are 
required when 'disposition' is T, 
start the tape writer as many 
times as copies are needed. 



devaddr-cf->tape 

Is used only if 'disposition' is 
T. It specifies, in the format 
cuu, the channel and unit address 
cf the tape drive tc te used for 
the tape spooling when the job 
entry is being executed. If this 
parameter is omitted, the operator 
must specify the address at the 
console at execution time. If a 
jcb entry contains not enly a 

* $$ PUN statement but also a 

* $$ PRT statement for tape 
spooling, each statement must 
specify a different tape as 
'devaddr-of-tape' . 



number-of -car ds-before-msg 

Is used only for disk spooling and 
specifies the number cf punch 
records that are intercepted by 
POWER before a warning message is 
sent to the central installation 
operator. The parameter is 
specified as a number from one to 
six digits. It overrides, for 
this job entry only, the value 
specified by the POWER generation 
option STDCARD. If ' number-of - 
cards-before-msg' is emitted, the 
value specified by STDCARD is 
used. 
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RPR State men t 

The * $$ RDR statement causes a POWER 
reader routine to insert a diskette file 
into the input stream being read from a 
card reader. The diskette file can contain 
data and/or job control statements. The 
* $$ RDR card is placed in the job stream 
on the card reader at the point where 
reading from the diskette file is to begin. 



Forma t 

* $$ RDR [SYSnnn] , ['filename'] , [vols] , [S] 

SYSnnn Is specified only if the 

diskette file is to be treated 
as a data file and not as a 
SYSIN file. nnn is the 
programmer logical unit number 
that will be used to read the 
file when the job is executed. 

If SYSnnn is not specified, the 
diskette file must consist of 
card images in the form of 80 or 
81 character records. The first 
character of 81 character 
records is removed when the 
record is placed in the DATAFIL. 
POWER handles JECL and JCL card 
images from a 3540 as it does 
cards from a card reader. 
During execution the diskette 
file is handled as card input 
from a SYSIN card device. 

If SYSnnn is specified, POWER 
accepts any diskette file with 
records from 1 to 128 characters 
long. No checking for JECL or 
JCL statements is performed, nor 
is the first character cf 81 
character records removed. 

The following restrictions apply 
to programs using spooled 
diskette files: 

• The diskette file must be 
retrieved using logical IOCS. 
Physical IOCS is not 
supported. DLEL and EXTENT 
cards are required as they 
would be for a file on a 
physically present 3540 
diskette. 

• The programmer logical unit 
specified in the * $$ RDR 
card must be used; SYSIN is 
not allowed. 

• Device type specification cf 
the physical (dummy) device 
must be 3540. 



All the cards before the 
* $$ RDR card in the card 
reader must have been read by 
job control or the program 
before the diskette file is 
opened. 

If the SYSIN card reader is 
accessed while the diskette 
file is open, the entire 
spooled diskette file is 
flushed. Subsequent attempts 
to read frcrr a diskette file 
would produce unpredictable 
results. 



'filename' Is specified as it appears in 
the HDRl label on the diskette 
(up to 8 characters). If this 
parameter is ciritted, POWER 
reads the first ncn-protected 
file found on the diskette 
currently mounted on the 3540. 

vols Is the maximum number of 

diskettes tc be read. Allowed 
values are 1-255, default is 1. 
Reading steps after the 
specified number cf diskettes 
have been read cr after the last 
diskette of the file has been 
read. 

S Indicates that volume sequence 

checking is desired. If the 
parameter is emitted, no 
sequence checking is done. The 
sequence number of the first 
volume must be 1, that of the 
second volume must be 2, and so 
on. 



* $$ SLI Statement 



The * $$ SLI statement may be used only if 
FOWER was generated with the Source Library 
Inclusion (SLI) feature. It allows you to 
insert data from a sublibrary cf the scurce 
statement library into the job stream. 



Fcrirat 

* $$ SLI [sublibrary . Ibcckname 

suhlibrary Specifies the sutlibrary 

containing the bcok that is to 
be inserted into the jcb 
stream. It is specified as one 
character. If 'sublibrary' is 
omitted, the character 
specified in the POWER 
generation option SUELIB is 
assumed as default. 
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booknanie Specifies the name of the book 
that is to be inserted in the 
job stream. This is the same 
name as the name under which 
the book was cataloged in the 
source statement library. 

When a * $$ SLI statement is encountered in 
the input stream at execution time, the 
POWER partition's private source statement 
library and the system source statement 
library are searched for the book in the 
(specified or assumed) sublibrary. If a 
private source statement library is 
assigned to the POWER partition, it is 
searched before the system source statement 
library. If the book is not found in 
either library, an error message is issued 
and a corrected * $$ SLI statement may be 
entered. 

If you wish to include /* and /S 
statements in the SLI book, you must change 
the /* statement to a / $$/* statement 
(columns 1-6) and the /& statement to a 
* $$/£ (columns 1-6) since /* and /S 
statements are not accepted as data by 
MAINT. (This is shown in book ASSM under 
"Examples of JECL Statements" in this 
section. ) 



An * $$ SLI statement may be followed by 
one or more SLI update cards. 



SLI U pd ate Cards 

Any source statement library beck that is 
inserted in the job stream and has less 
than 1000 cards may be updated by means of 
SLI update cards. The update affects only 
the cards inserted in the jot stream, that 
is, the contents of the book in the source 
statement library are not changed. 



SLI update cards may be used to insert 
new cards cr to delete or replace existing 
cards. The actual operation to be 
perfcrired is specified by a code in column 
77. The format of SLI update cards is 
shewn in Figure 9. 



Note that SLI update cards must 



Follow the * $$ SLI staterrent 
Contain $SLI in columns 73-76 
Ee in ascending sequence. 



( 



Columns 



■if- 



S- 



73-76 



$SL I 



77 



78-80 



sequence 
number 



Codes 

A - Insert card after source statement library card with same sequence nuirber in 
columns 78-80. 

B - Insert card before source statement library card with same sequence number in 
columns 78-80. 

D - Delete source statement library card with same sequence number in columns 78-80. 

any other code - Replace source statement library card with same sequence numter in 
columns 78-80 or insert card into job stream at proper sequence pcint. 

Figure 9. Format of SLI Update Cards 



< 
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EXAMPLES OF JECL STATEMENTS 

The following examples illustrate the use 
of JECL statements. 

Example 1 — Define DOS/VS Jo bs as POWER 
Job Entries 



number 1 is placed in the reader queue with 
the generated priority. Job entry number 2 
is defined by JECL, which specifies that it 
is tc be placed in the reader queue with 
priority 5. Job entry number 3, like job 
entry number 1, has re JECL and is given 
the default priority. 






) 



Figure 10 shows three DOS/VS jobs taken 
from a hypothetical job stream. Job entry 



r r 

POWER 

Job 

Entry 



// 
// 
// 
// 
// 
// 
// 
/* 
/£ 



JOB CLEAR DISK 

ASSGN 

ASSGN 

UPSI 

EXEC CLRDK 

UCL 

END 



* $$ JOB TEST, ,5 

// JOB ASSEMBLE TEST 

// EXEC ASSEMBLY 



/* 
/& 

* $$ EOJ 



// JOB SORT 



/£ 



DOS/VS 
Job 



Figure 10. JECL Example 1 — Define DOS/VS Jobs as POWER Job Entries 
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Example 2 — Define DOS/VS Job Steps as 
POWER Job Entries 



The job UPDATE in Figure 11 contains four 
job steps, which are identified by four 
EXEC statements. Multiple copies are 
needed of the printed output from steps 3 



and 4 (* $$ PRT statements) . All job 
entries are defined by JECL. The fifth 
* $$ JOE statement specifies explicitly a 
priority. The first four job entries use 
the default priority. The operator does 
not have to stop the printer to set up 
multiple fcrms. Output processing will not 
be interrupted. 



( 



r t 

POWER 

Job 

Entry 



* $$ JOB UPDATE 
// JOB UPDATE 



// EXEC DISK 



/* 



// EXEC PREPARE 
* $$ EOJ 



* $$ JOB RECONCIL 

* $$ PRT , ,2 



// EXEC MATCH MERGE 



* $$ EOJ 



* $$ JOB NEWLIST 

* $$ PRT , ,4 
// EXEC LIST 
/S 

* $$ EOJ 



* $$ JOB PRINT 

* $$ PRT , ,4 
// JOB SSERV 
// EXEC SSERV 



/* 
/& 

* $$ EOJ 



* $$ JOB PAYROLL, ,1 CONFIDENTIAL 

* $$ PRT T,270A,283 CONFIDENTIAL 

* $$ PUN T,270B,284 CONFIDENTIAL 

* OPERATOR — THIS JOE IS COMPANY CONFIDENTIAL 
// JOB PAYROLL FOR WEEK ENDING 7/20/7 3 

// EXEC PAYROLL 



/* 
/£ 

* $$ EOJ 



-+■ 



DOS/VS 
Job 



L X X J 

Figure 11. JECL Example 2 — Define DOS/VS Job Steps as POWER Job Entries 



( 
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Example 3 — Define Multi ple DQS/ V S J obs as 
a Single POWER Job Entry 

Figure 12 defines two POWER job entries. 
The first job entry is a job where the 
input contains DOS/VS job control. Without 
JECL, POWER would interpret the second 
// JOB statement as defining a new job 
entry. Therefore, JECL is required to run 
this job under POWER. 



The second 
and consists 
run after all 
are placed co 
when they are 
entry. When 
central insta 
is held until 
the job entry 



job entry has a low priority 
of student jobs that are to be 

the others. Therefore, they 
llectively in the held state 

submitted as one POWER job 
they are released by the 
llation operator, the output 

the last DCS/VS job within 

has been completed. 



r t 

POWER 

Job 

Entry 



* $$ JOB COPY 
// JOB CDTP 



// EXEC COPY 



// JOB PAYROLL 



/& 



Job to be copied 



/* 
/& 

* $$ EOJ 



* $$ JOB TRAINER, H,l 
// JOE STUDENT1 
// EXEC ASSEMBLY 



/* 
/£ 

// JOB STUDENT2 
// EXEC ASSEMBLY 



/* 
/£ 

// JOE STUDENT3 



// JOB STUDENTN 

/& 

* $$ EOJ 

I J J. J 

Figure 12. JECL Example 3 — Define Multiple EOS/VS Jets as a Single POWER Jet Entry 



-+ 



DOS/VS 
Jot 
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Examp le 4 — S imple Use o f Source Library 
I nclu sion (SL I) Feature 

Figure 13 begins with a job stream 
consisting of three cards. The * $$ SLI 
statement causes POWER to search the system 



source statement library for the book PRNT 
which is tc be contained in sublibrary A. 
The statements in the book PRNT replace the 
* $$ SLI statement and are placed in the 
reader queue for execution. 



jjob Stream Containing a * $$ SLI Statement 



* $$ JOB PRINTSLI 

* $$ SLI A. PRNT 

* $$ EOJ 



Book PRNT in System Source Statement Library 



BKEND A. PRNT 
// JOB PRINT 
// EXEC SSERV 

DSPCH A.POWER,A.POWERRES,A.POWERSUP 

DSPCH A.POWERBUF,A.DSKIO 

* $$/* 

* $$/& 

BKEND 



PRNT0010 
PRNT0020 
PRNT0030 
PRNT0 04 
PRNT0050 
PRNT0060 



Job Stream Passed to DOS/VS for Execution 



// JOB PRINT 
// EXEC SSERV 

DSPCH A . POWER , A . POWERRES , A . POWERSUP 

DSPCH A.POWERBUF,A.DSKIO 
/* 
/£ 



PRNT0010 
PRNT0020 
PRNT0030 
PRNT00U0 
PRNT0050 
PRNT0060 



Figure 13. JECL Example 4 — Simple Use of Source Library Inclusion (SLI) Feature 



E xamp le 5 -- Use of ♦ $$ DATA Statement and 
S LI Up date Cards 



A private sour 
assigned to th 
begins with a 
the private so 
assigned to th 
addition, the 
update cards t 
source stateme 
statement to i 
retrieved. 



ce statement library has been 
e POWER partition. Figure 14 
job stream which references 
urce statement library 
e POWER partition. In 
job stream contains SLI 
o update the book from the 
nt library and a * $$ DATA 
nsert data in the book to be 



The private source statement library is 
searched for the book named ASSM in 
sublibrary B. The statements in bcok ASSM 
replace the * $$ SLI statement. However, 
statements ASSM0020, ASSM0100, and ASSM0120 



are replaced by the corresponding SLI 
update cards in the input stream. 



When the * $$ DATA statement in bcok 
ASSM is encountered, POWER tests if the 
input stream contains a * $$ DATA statement 
with the same name (INPUTA). Since this is 
the case, the * $$ DATA statement in bcok 
ASSM is replaced by the three cards that 
immediately follow the * $$ DATA statement 
in the input stream. The job stream is 
placed in the reader queue for execution. 

Ncte that the * $$ DATA statement and 
the SLI cards in the input stream must 
appear in the same order in which the 
corresponding card images appear in the 
scurce statement library. 
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Job Stream Containing SLI Update and Data Cards 



* $$ JOB 


ASSEMBLE 


* $$ SLI 


E.ASSM 


// ASSGN 


SYSPCH,X'182' 


* $$ 


DATA INPUTA 


DEFAULT 


POWER 




END 


/* 




// ASSGN 


SYSIPT,X'18 2' 


MTC 


RUN, X , 182* 


* $$ 


EOJ 



(SLI statement) 
(update card) 
(DATA statement) 
(data card) 
(data card) 
(data card) 
(update card) 
(update card) 



$SLI0020 



$SLI0100 
$SLI0120 



Book ASSM in the Private source Statement Library 



BKEND 


B.ASSM 


// JOB 


ASSEMBLE 


// ASSGN 


SYSPCH,X'180' 


// EXEC 


ASSEMBLY 


* $$ DATA 


INPUTA 


// MTC 


WTM f SYSPCH 


// MTC 


WTM,SYSPCH 


// MTC 


REW,SYSPCH 


* $$/& 




// JOB 


CATALOG 


// ASSGN 


SYSIPT, X'180' 


// EXEC 


MAINT 


MTC 


RUN,X'180' 


* $$/* 




* $$/& 




// JOB 


LINK 


// OPTION 


CATAL 


INCLUDE 


DEFAULT 


ENTRY 


INIT 


* $$/* 




// EXEC 


LNKEDT 


* $$/& 




BKEND 





(replaced by data cards) 



ASSM0010 
ASSM0020 
ASSM0030 
ASSM0040 
ASSM0050 
ASSM0060 
ASSM0070 
ASSM0080 
ASSM0090 
ASSM0100 
ASSM0110 
ASSM0120 
ASSM0130 
ASSM0140 
ASSM0150 
ASSM0160 
ASSM0180 
ASSM0190 
ASSM0200 
ASSM0210 
ASSM0220 



Job Stream Passed to DOS/VS for Execution 



// JOB 
// ASSGN 
// EXEC 

DEFAULT 



/* 
// 
// 
// 
/& 
// 
// 
// 

/* 

/& 
// 
// 



/* 
// 



MTC 
MTC 
MTC 

JOB 
ASSGN 
EXEC 
MTC 



JOB 

OPTION 
INCLUDE 
ENTRY 

EXEC 



ASSEMBLE 
SYSPCH,X , 182' 
ASSEMBLY 
POWER 

END 

WTM,SYSPCH 
WTM, SYSPCH 
REW, SYSPCH 

CATALOG 
SYSIPT,X'182' 
MAINT 
RUN,X , 182' 



LINK 
CATAL 
DEFAULT 
INIT 

LNKEDT 



(updated) 

inserted by 
DATA feature 



(updated) 
(updated) 



ASSM0010 
ASSM0030 



ASSM0050 
ASSM0060 
ASSM0070 
ASSM0080 
ASSM0090 

ASSM0110 

ASSM0130 
ASSM0140 
ASSM0150 
ASSM0160 
ASSM0180 
ASSM0190 
ASSM0200 
ASSM0210 
ASSM0220 



Figure 14. JECL Example i> — Use of DATA Statement and SLI Update Cards 
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E xamp le 6 — Use of ♦ $$ RPR Statement to 
Insert Data from IBM 3540 Diskette I/O Unit 
i nto a Card_Input Stream 

Assume that the job control statements for 
a job MIXEDIN are submitted from the card 
reader (0OC) and that the data to be 
processed in the job are contained in a 
file KEYENTRY on two diskette volumes 
mounted on a 3540 at address 00B. The 
operator enters the command 

S BGRDR, 00C,1, 00B 



which tells POWER to start a reader routine 
using one buffer to the card reader at 
address 00C with the ability to read from a 
3540 at address 00B. The 3540 belongs to 
this reader routine and cannot be used by 
any ether partition cr POWER routine until 
the reader routine has terminated. 



The placement of the * $$ RDR card 
within the control statements submitted 
from the card reader is shown in Figure 15. 



Cards in Card Reader 00C 
Q) // JOB MIXEDIN 
(5) // ASSGN SYS008,X'01B' 
Q) // DLBL FILEA, ' KEYENTRY' „ ,DU 



// EXTENT SYS008 
// EXEC MIXEDIN 



n?) * $$ RDR SYS008, 'KEYENTRY' ,2 



/* 
/S 




© 
© 

© 



JECL can be used in addition to DOS/VS JCL. 

Assigns SYS008 to the dummy 3540. 

Label information needed when the user opens his diskette file. SYS008 need not be 
specified in the EXTENT card if DEVADDR=SYS008 was specified in the DTFBU macro. 

This card tells the POWER reader routine to suspend card reading and read up to two 
diskettes of a data file named KEYENTRY. When the end of the KEYENTRY file is 
reached, card reading resumes. When reading from the diskette, the reader routine 
will use enough data buffers as I/O areas tc hold one track of diskette data; when 
reading cards, it uses the number of buffers specified in the S command. 



Figure 15. JECL Example 6 — Insert Data from a Diskette into a POWER Job being read 
from a Card Reader 



< 
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Example 7 -- Use of a ♦ $$ RPR Statement t c Insert Card I mag es f ro ir a 3540 Diskette File 
into a Card Input Stream 

As in example 6 the operator enters the command 

S EGRDR,00C f l,00B 

to start a reader routine reading from a card reader and a 3540 diskette. 



j Cards in the Reader 



!© 
© 



© 



|Cards in the 3540 File 'CARDFILE' 
4 



// JOE CATAL 

// OPTION CATAL 

* $$ RDR , 'CARDFILE' , 1 



3 ) /* 

// EXEC LNKEDT 
/* 



// EXEC ASSEMELY 



END 
(End cf diskette file) 



\ 



Clj The reader routine reads cards until it encounters a * $$ RDR card specifying a 
^-^ diskette file. 

C2.J The file in the * $$ RDR card is then read in from the diskette mounted on the 3540 

^"^ until end-of-file is reached cr until the vclume ccunt is exhausted. Note that the 

parameter * SYSnnn' must be omitted for the diskette file to be inserted as card 

images. 

(3J Reading from the card reader is then resumed until the next * $$ RDR card is 
^■^ encountered or until end-of-file on the card reader is reached. 



Figure 16. JECL Example 7 — Use cf a * $$ RDR Statement to Insert Card Images from a 
3540 Diskette File into a Card Input Stream 



CENTRAL INSTALLATION CONSOLE COMMANDS 



The central installation console commands 
allow you to control the POWER and POWER 
RJE system from the operator's console. 
They are entered in the same way as 
attention commands. 



2. Queue management: 

A (Alter job entry priority) 

D (Display status of job entry) 

H (Held jot entry) 

I (Delete job entry) 

R (Release job entry) 

J (Process ACCTFIL) 



) 



FUNCTION OF CENTRAL INSTALLATION CONSOLE 
COMMANDS 

Operations performed by the console 
commands may be divided into four groups: 

1. Routine and system management: 

S (Start routine) 

P (Stop routine) 

G (Reactivate routine or partition) 

C (Cancel routine) 

F (Flush job entry output) 

M (Display or alter copy counter) 

T (Restart job entry output) 

E (Terminate or cancel POWER program) 



RJE management: 

B (Send, delete, or display messages) 

I (Inquire about status cf RJE routine) 

(Change output destination of a job 

entry) 

S (Start RJE routine) 

P (Step RJE routine) 

G (Reactive RJE routine) 

D (Display status cf RJE jcb entry) 



Diagnostics: 

Z (Trace TIB, QFILE, or DATAFIL access 
by POWER) 
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FORMAT OF CENTRAL INSTALLATION CONSOLE 
COMMANDS 



The console commands consist of two fields: 
the operation field and the operand field. 

Operation Field. This field specifies a 
single letter which defines the operation 
to be performed. Any number of blanks may 
precede the operation field. If operands 
are specified, they must be separated from 
the operation field by at least one blank. 

O pera nd Field. This field contains one or 
more positional parameters separated by 
commas. A blank terminates the operand 
field. The only exception is the E 
command, where blanks may appear as part of 
the message text operand. 



DESCRIPTION OF CENTRAL INSTALLATION CONSOLE 
COMMANDS 

This section lists all the console commands 
in alphabetical order. A summary of the 
console commands is contained in "Appendix 
D". 



The A command changes the priority of a job 
entry after it has been inserted in the 
POWER queues. For a job entry in the input 
queue (RDR), the change determines when the 
job entry will be processed by DCS/VS. For 
output, the command changes the sequence in 
which the job entries are processed by the 
writer routines. 



A BGRDR,ASSEMBLY,016,3 
A F2PUN,0EJECT, ,0 



E Command (Broadcast) 



The B command enables the central 
installation operator to communicate with 
remote terminals. Messages may be 
submitted for a specific terminal or for 
all terminals. 

Messages are grouped and are given 
numbers within the groups. There is one 
group for each 'userid' and 'termid' . An 
additional group, called 'ALLUSERS ' 
consists of messages addressed to all 
users. 



A Command (Alter) 

The A command alters the priority of job 
entries in the queue. It is ignored if 
POWER was generated with PRICRITY=NO. 



Format 

A queue, name, [number] , priority 



The B command permits you to 

• Add a message to one group. 

I« Delete one message, all messages of a 
group, cr all messages. 

• Display cne or all messages of a group 
en SYSLCG. 



queue specifies the queue to which the 
command is directed in the xxyyy 
format, where 

xx = BG, F4, F3, F2, 
yyy = RDR, PRT, or FUN 

name specifies the name of the job 
entry. 

number specifies the number assigned to 
the job entry by POWER when it is 
inserted in the input queue. The 
number may be obtained by using 
the D command. It may consist of 
up to five numeric characters and 
allows the addressing of different 
job entries that have identical 
names . 

priority specifies the priority the job 
entry is to assume. It is 
specified by a numeric character 
from to 9. Nine is the highest 
priority. 



When a message is added, it is given the 
next higher number within its grcup. When 
a message is deleted, the messages of the 
group are renumbered. Therefore, the 
actual message numbers can be obtained only 
by displaying an entire group. 



( 



Format 



Message option: 
( termid 



M, 



userid 
ALLUSERS 



Delete option: 

termid 
userid 
L, J ALLUSERS 
.ALL 



, 'msg' 



[,nr] 
[,nr] 
t,nr] 



( 
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3. 



Display option: 
( termid 



B D, 



userid 
ALLUSERS 



[,nr] 



B Specifies the B command option 
desired. 

M Causes the specified messages to 
be added to the specified message 
group. 

L Causes the specified message, all 
of the messages of a group, or all 
messages to be deleted. 

D Causes the specified message or 

all of the messages in a specified 
group to be displayed en SYSLOG. 

termid Specifies the group in the RJE 
userid message queue to which the B 
ALLUSERS command option applies. 'termid' 
ALL and 'userid' are valid if they are 
entries in the userid list (see 
'Userid List Generation' in DOS/V S 
System Generation, GC 33-5377) , 
which is created when POWER/RJE is 
generated. ALLUSERS specifies 
those messages to be broadcast to 
all users. ALL specifies the 
entire message queue. 

msg Specifies the message to be added 
to the specified group. The 
message may consist of up to 40 
characters, enclosed in single 
quotation marks. If the message 
text contains a quotation mark, 
type in two quotation marks for 
each that is to appear in the 
message. 

Operator messages to termids can be 
retrieved at the remote terminal with the 
command 



To perform its functions, the B command 
requires a data buffer. If a data buffer 
is net available when the B command is 
used, a message to this effect will appear 
en SYSLOG and the command will be ignored. 

Examples 

E M,NEWYCRK, 'RJE CEASES AT 14. 0C TODAY, 
4/18/73' 

This is a message to one specific terminal. 

E D f NEWYCRK Display all messages to 

New York 
E D, DENVER, 3 Display message No. 3 to 

Denver 
B D, ALLUSERS Display messages to 

all users 
E D f ALLUSERS, 4 Display message No. 4 to 

all users 
E L, CHICAGO Delete all messages to 

Chicago 
B L,LONDCN,l Delete message no. 1 to 

London 
E L, ALLUSERS Delete all messages to 

all users 
E L, ALLUSERS, 6 Delete message No. 6 to 

all users 
E L,ALL Delete the entire message 

queue 



C Command (Cancel) 

The C command cancels a reader or writer 
routine. 



Format 

C (queue t ,ioaddr] 
jloaddr 

queue Specifies the reader cr writer 

routine in the xxyyy cr yyy format, 
where 



> 



RJSTART termid, BRDCST , . . 



Messages to a userid can be retrieved by 
the command 

* . . BRDCSTR 



Messages addressed to termids and userids 
are deleted after delivery. 

nr Specifies the number of a specific 
message in the RJE message queue, 
'nr' is specified as cne cr two 
numeric characters from 1 to 99. 
If this operand is emitted, all 
messages for the specified 
•userid', 'termid', or 'ALLUSERS' 
are assumed. 



xx = BG, F4, F3, F2, or Fl 
yyy = PRT, PUN, or RDR 

A specification in the yyy format 
specifies a partition-independent 
reader/writer routine. 

If "queue* is omitted, POWER cancels 
the routine that is active en the 
device specified by 'loaddr'. 

ioaddr Specifies the address of the I/O 
device for which the routine was 
started in the cuu or X'cuu' format. 
'icaddr' may be emitted only if the 
AUTCSTR generation option is 
specified. If the reader routine 
was started to a card reader and a 
3540, specify the card device for 
cuu. 



POWER 73 



When a reader routine is reading input, the 
C command terminates processing, and the 
job entry affected by the command must be 
reentered. 

For reader routines using the 5425, see 
the note under the P command. 

When a writer routine is punching or 
printing output, the C command terminates 
output processing, and the output cf the 
job entry affected by the command is 
deleted from the output queue. 

POWER acknowledges the C command with 
the message 

1Q77I STOPPED xxycuu 

where y = R for a reader routine 

T for a print writer routine 
P for a punch writer routine 

Examples 

1. Cancel reader routine: 

C BGRDR,00C 
C RDR, 00C 
C X'OOC 

2. Cancel writer routine: 

C BGPRT,00E 
C F2PUN,X , 00D' 
C 00E 

3_Command__(Eisplay)_ 

The D command (1) provides ycu with status 
information on the running FCWER system, or 
(2) displays the status of job entries in a 
specified queue. The information is 
displayed on SYSLOG. 



Format 



Provide information on running POWER 
system: 



Specifies a request for a list of 
all reader, writer, and RJE 
routines currently active. Each 
entry in the list appears in the 
format 1Q20I xxycuu where 

xx = EG,, F4, F3, F2, or Fl 

XX for partition-independent 
routines 

y = R for a reader routine 

T for a print writer routine 
P for a punch writer routine 



xxy = RJE for RJE routines 

cuu = device address of unit record 
device 

If no routines have been started, 
the message 

1Q12I NO ACTIVE ROUTINES 

is issued. 

Specifies a request for a display 
of the number of program and data 
buffers in the system not currently 
in use. The report is in the 
format 

1Q14I xx PROGRAM EUFFERS 
1Q15I xx DATA EUFFERS 

Specifies a request for the number 
cf free QFILE records and track 
groups. The report is in the 
format 

1Q10I xxxx TRACK GROUPS 
1Q11I XXX QFILE RECORDS 



System time and date, 
issued in the format 

1Q16I TIME = xx/xx/xx, 
DATE = xx/xx/xx 



Display, status of job entry: 



,name [ , number] 
t'^LL] 
,HOLD 

Apriority 
, class 
, FREE 
, LOCAL 
,RJE 



These are 



E queue 



queue 



name 



number 



Specifies the queue to which 
the command is directed in 
the xxyyy cr yyy fcrmat, 
where 

xx = EG, F4, F3, F2, or Fl 
yyy = RDR, PRT, cr PUN 

A specification in the yyy 
format indicates a 
partition-independent 
display. 

Specifies the name of the job 
entry. 

Specifies the number assigned 
to the job entry by POWER 
when it is entered in the 
input queue. Job entry 
numbers may consist cf from 
one to five numeric 



< 
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characters; it allows 
addressing of specific jcb 
entries with identical names. 

ALL Specifies a general request 

for status information on all 
job entries in the specified 
queue. 

HOLD Specifies a general request 

for status information on all 
job entries in the 'hold' 
state in the specified queue. 

priority Specifies a general request 

for status information on all 
job entries in the queue with 
the specified priority. 
Priority is specified by Pn, 
where n is a numeric 
character frcir thrcugh 9. 
Nine is the highest priority. 

class Specifies a general request 

for status information on all 
job entries belonging to the 
specified class. Class is 
specified by CLASSn, where n 
is any alphabetic character 
from A through Z. 

FREE Specifies a general request 

for status infcrmaticn on all 
job entries of the specified 
queue (s) that are net in the 
'hold' state. 



The report obtained for RJE job entries 
locks the same as the report for lecal 
routines, with one exception: the former 
lists the destination of the RJE job 
entries ('termid', 'userid', •ALLUSERS'). 



Examples 

Command: D BGRDR, ASSEMBLY, 10 

Report: 1Q27I ASSEMELY 00010 2 C0000103 

Command: D BGPRT,CLASSA 

Report: 1Q27I REPORTA 00022 5 * A 00002000 

Command: D PRT,FREE 

Report: 1Q27I STOCKINV 00017 * C 00005000 
1Q27I BILLING 00019 * B 00001000 



E Command (En d/Cancel) 

The E command terminates the POWER program, 
and frees the POWER partition and the 
POWER-supported partition. The POWER- 
suppcrted partitions will have SYSIPT, 
SYSRDR, SYSLST, and SYSPCH unassigned. The 
following iressage appears en SYSLOG for 
each supported partition that has been 
active under POWER: 

1C10A PLEASE ASSGN SYSRDR 



If no further activities are planned for 
such partitions, they may be stepped by 
means of the DOS/VS command STOP. 



) 



LOCAL Applies only tc POWER with 
RJE; it specifies a general 
request for status 
information en these job 
entries of the specified 
queue (s) that were submitted 
at the central installation. 

RJE Specifies that the command 

applies to RJE jcb entries in 
the specified queue. 

The example below shows the format of the 
status report: 

F2 ,000020000 

1 
no. of records 



Format 



1 

'no records' 
is normally 
equal to the 
number of 
printed or 
punched cards: 
However, if 
cards are prin- 
ted and punched 
'no. of records' 
is equal to the 
number of punch 
and print 
operations 
performed. 



job entry class 



= in process 
D = ready to run 
H = in hold state 
R = output for RJE terminal 
W = output for RJE 

terminal in hold state 



job entry number 



[KILL] 



no operand 



KILL 



job entry name 



Terminates the POWER program, 
frees the POWER partition for 
another program, and restores 
the system tc noriral DOS/VS 
operation. POWER-supported 
partitions ccntinue until 
processing of their current job 
entries has completed. After 
completion, POWER issues the 
iressage 

1Q42I POWER HAS EEEN TERMINATED 



cancels the POWER program 
immediately and causes a dump 
to be produced if SYSLST is 
assigned in the POWER 
partition. All running 
partitions that are supported 
by POWER are canceled, too. 
The active POWER routines are 
stopped immediately. When the 
dump has been printed, POWER 
issues the message 

1QU2I POWER HAS EEEN TERMINATED 



POWER 7 5 



Note; If a partition supported by POWER 
was stopped during POWER execution, it must 
be activated by means of the BATCH command 
before issuing the E command to ensure that 
the last job entry in the partition is 
terminated. 



F Command (Flush) 

The F command terminates processing of the 
job entry output for a specified writer 
routine and deletes the job entry output 
from the output queue. 

Format 



I queue [ , uraddr] \ 
queue, [uraddr] ,ALL| 
uraddr [, ALL] ) 



queue Specifies the queue for which the 
writer routine was started in the 
xxyyy or yyy format, where 

xx = EG, F4, F3, F2, or Fl 
yyy = PRT or PUN 

If 'queue* is omitted, POWER 
terminates the job entry output for 
the writer routine that is active 
on the device specified by 
•uraddr' . 

uraddr Specifies the I/O address for which 
the routine was started in the cuu 
or X'cuu' format. 'uraddr' may be 
omitted only if the AUTOSTR 
generation option is specified. 

ALL Specifies that, in addition, all 

output in the specified queue is to 
be deleted. 

The F command permits the specified writer 
routine to remain active to process job 
entry output as it becomes available in the 
output queue. 

POWER does not acknowledge the F command 
with a message. However, the specified 
device should momentarily stop printing or 
punching the current job entry. 

Examples 

F BGPRT,00E 

F 00E 

F F2PUN„00D,ALL 

F PRT,00E 

F X'00D',ALL 



G Command (Go) 

The G command reactivates a POWER routine 
which is waiting for an operator action. 



Fcrirat 



queue [ , uraddr]' 
uraddr 
G ) partition 
RJE,lineaddr 

queue Specifies the queue fcr which 

the reader cr writer routine was 
started in the xxyyy cr yyy 
format, where 

xx = BG, F4, F3, F2, or Fl 
yyy = RDR, PRT, or PUN 

A queue specification in the yyy 
format indicates a 
partition-independent routine. 

If 'queue' is emitted, POWER 
reactivates the routine that is 
en the device specified by 
'uraddr' . 

uraddr Specifies the address of the I/O 
device for which the routine was 
started in the cuu or X'cuu' 
format. 'uraddr' may be omitted 
only if the AUTOSTR generation 
option is specified. 

partition Specifies the partition in which 
execution was temporarily 
halted. 

RJE Specifies that the command is 
directed to an RJE routine. 

lineaddr Specifies the line for which the 
RJE routine was started in the 
cuu or X'cuu' format. 

POWER does not acknowledge the G command 
with a message. However, reactivating a 
reader or writer routine causes the 
specified device to resume operation. 



Examples 

1. Reactivate Reader or Writer Routine 

G BGFRT,00E 

G PRT,00E 



\ 



(partition-independent 
routine) 



G F2FUN,00D 
G X'OOE' 



2. Reactivate POWER-Supported Partition 

G BG 
G F2 

3. Reactivate RJE Routine 
G RJE, 022 



( 
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) 



H Command (Hold) 

The H command places the specified job 
entry in the hold state. It prevents 
processing of one or all job entries in the 
specified queue. Job entries may be 
removed from the hold state only by the R 
command. 



Format 



H queue 



queue 



name 



number 



, name [ , number] 
[,ALL] 
, priority 



Specifies the queue to which the 
H command is directed, in the 
xxyyy format, where 

xx = BG, F4, F3, F2, or Fl 
yyy = RDR,, PRT, or PUN 

Specifies the name of the job 
entry. 'name' may be frcm one tc 
eight alphameric characters. 

Specifies the number assigned to 
the job entry when it is entered 
in the input queue. Use the D 
command to obtain the jcb number, 
'number' may be from one to five 
numeric characters; it allows 
addressing of specific job 
entries with identical names. 



ALL 



priority 



Specifies that all jcb entries in 
the specified queue are to be 
placed in the hold state. 

Specifies that all job entries in 
the specified queue with the 
specified priority are to be 
placed in the held state. 
Priority is specified by Pn, 
where n is a numeric character 
from through 9. Nine is the 
highest priority. 



Examp les 



H BGRDR , ASSEMBLY , 2 

H EGPUN,P3 

H F2RDR,ALL 

H F2PRT,TEST 



(priority option) 



I Command (Inquire ) 

The I command provides the central 
installation operator with status 
information on a specific RJE routine or on 
all RJE routines. POWER responds with a 
report which includes, for each specified 
routine, the routine designation, termid, 
userid, and status. The status is one of 
the following: processing, active, 
inactive, not attached, not initiated, not 
supported (that is, no RJE block is 
associated with the specific line) . The 
items included in the report are shown in 
Figure 17. , 



) 



1 

Command 
Specification 


Terminal State 


Report Item 
Included 


Not 
Attached 


Not 
Supported 


Not 
Initiated 


1 nactive 


Active 


Processing 


'lineaddr' 


'termid' 


'userid' 


'lineaddr' 




X 










X 


N 


N 






X 








X 


N 


N 








X 






X 


N 


N 










X 




X 


X 


N 












X 


X 


X 


X 


'termid' 


X 












N 


X 


N 










X 




X 


X 


N 












X 


X 


X 


X 


'userid' 


X 












N 


N 


X 












X 


X 


X 


X 


X = item is included in the report. 

N = item is specified in the report as "NONE". 

The ALL option of the 1 command creates a report for each RJE Block Name List Entry in accordance with the 'line addr' 
specification above. 



Figure 17. Terminal States in Response to I command 



POWER 77 



Format 



U, userid 
T, termid 
I I L,lineaddr 
ALL 



U f userid 



T. termid 



L, lineaddr 



ALL 



Specifies a valid 'userid' as 
defined during POWER 
generation. 'userid' rray be 
from one to eight alphameric 
characters. 



Specifies a valid 'termid' as 
defined during POWER 
generation. 'termid' may be 
from one to eight alphameric 
characters. 



Specifies the line for which an 
RJE routine is or may be 
started in the cuu or X'cuu' 
format. 



Specifies that a status report 
is required for all RJE 
routines. 



E xamp les 

I U f SMITH 

I T,NEWYORK 

I L,030 

I ALL 



J_C omm a nd (Job Accounting )_ 



The J command causes processing of the 
POWER accounting file. It is accepted only 
if ACCOUNT=YES was specified as a POWER 
generation option. 



The J command allows you to retrieve the 
accumulated account file records. POWER 
informs you when the account file is full 
by issuing a message on SYSLOG. You must 
then use the J command to empty the account 
file. 



You may use the J command to punch the 
account file to cards, to write the account 
file to tape, or to delete the account file 
records. The file is then reusable frcm 
its beginning. The format of an ACCTFIL 
record is shown in Figure 18. The account 
file may be processed at any time while 
POWER is active. 





Pos. 








in 






| Field 


Eytes 


Data 


Format 


L J 


I - -t 


I-- - -l 


L_ 


r i 


r 1 


r 1 


r 


1 1 


1-8 


Name for the job 
entry 


alphameric 


1 2 


9-10 


Number of the job 
entry 


binary 


1 3 


11 


Number of print 
copies 


binary 


1 4 


12 


Number of punch 
copies 


binary 


1 5 


13-16 


Print forms 
identification 


alphameric 


1 6 


17-20 


Punch forms 
identification 


alphameric 


1 7 


21-28 


Date of execution 
(mm/dd/yy or 
dd/mm/yy depending 
on DOS/VS super- 
visor generation 
option) 


alphameric 


1 8 


29-32 


Read time 


binary 


1 9 


33-36 


Print time* 
Seconds x 3 00 


binary 


| 10 


37-40 


Punch time* 


binary 


| 11 


41-44 


Execution time** 


binary 


1 12 


45-48 


Number cf cards 
read 


binary 


1 I 3 


49-52 


Number cf lines 
printed per copy 


binary 


| 14 


53-56 


Number cf cards 
punched per copy 


binary 


1 I 5 


57-58 


Indicates execu- 
tion partition 
(BG, Fl, F2, F3, 
or F4 


alphameric 


1 16 


59 


Number of track 
groups for input 
storage 


binary 




60 


Number cf track 
groups for printed 
output 


binary 




61 


Number cf track 
groups for punched 
output 


binary 


1 17 


62 


Printed output 
priority number 


alphameric 


| 18 


63 


Punched output 
priority number 


alphameric 


| 19 


64 


Printed output 
class 


alphameric 


| 20 


65 


Punched output 
class 


alphameric 




66-80 


Reserved 




j. j 


L J 


i _ 


L _ 


r 

j* Nol 


b prcv: 


Lded for a tape wril 


ber . 


|** If 


shcrt 


jobs are executed. 


POWER 


| OV( 


srhead 


required for queue 


handling 


1 na 1 


t caus< 


2 POWER job account. 


mg times 


1 of 


up to 


3 0% higher than th< 


Dse 


| cci 


rputed 


by DOS/VS. 





Figure 18. Format of an ACCTFIL Record 
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Format 



number 



punchaddr 

tapeaddr 

DEL 



> 



punchaddr 



tapeaddr 



DEL 



Example s 

J 00D 
J 180 

J DEL 



Specifies the address of the 
punch that is to punch device 
the accounting records. It 
may be specified as cuu or 
X'cuu'. 

Specifies the address of the 
tape device for the accounting 
records. It may be specified 
as cuu or X'cuu* . 

When processing is completed, 
a tape mark is written and the 
tape will be rewound and 
unloaded. 

Specifies that the accounting 
file records are to be 
deleted. 



punch accounting file 

write the accounting file to 

tape 

delete the accounting file 



L Command (Delete) 



The L command deletes a job entry from the 
specified queue. Job entries being 
processed are not affected by this 
command. If there are no job entries in 
the specified queue, the message 



I 1Q06I QUEUE IS EMPTY 
appears on SYSLOG. 



Format 



L queue,. 



queue 



name[ , number] 
ALL 



Specifies the queue to which 
the L command is directed in 
the xxyyy format, where 



XX = BG, F4, F3, F2, 
= RDR, PRT, cr FUN 



yyy 



or Fl 



name 



Specifies the naire of the job 
entry. It may contain from 
one to eight alphameric 
characters. 



ALL 



Example s 



Specifies the nuirber assigned 
to the job entry by POWER when 
the job entry is in the input 
queue. Use the D command to 
obtain the number cf the jcb 
entry. 'number' may be from 
one to five numeric 
characters; it allows 
addressing cf specific job 
entries with identical names. 

specifies that all jcb entries 
in the specified queue are to 
be deleted. 



L BGPRT,RUN1,3 
L F2RDR,AIL 



M Comman d (Multiple Copy) 

The M command displays or alters the copy 
ccunter fcr the job entry output currently 
being processed by the specified output 
writer rcutine. 

The display option is used to determine 
the nuirber of copies left to be processed, 
including the one in progress. 

The alter option adds the specified 
value to the current copy counter. It is 
net possible to decrease the copy counter, 
but you may terminate processing of the 
jcb entry's output with the F cemmand. 
The copy counter cannct be higher than 
255. 



Format 

1. Display copy ccunter: 

i: 

2. Alter copy counter: 



M jqueueC ,uraddr]l 

^uraddr ' 



M jqueue, [uraddr] , additional] 
luraddr, additional > 

queue Specifies the queue fcr which the 
writer routine was started in the 
xxyyy or yyy format, where 

XX = BG, F4, F3, F2, cr Fl 
yyy = PUN,cr PRT 

.A queue specification in the yyy 
format indicates a 
partition-independent rcutine. 
If 'queue' is omitted, POWER 
alters/displays the ccpy counter 
for the job entry output being 
processed on the device specified 
by 'uraddr' . 



POWER 79 



uraddr specifies the address of the I/O 
device for which the writer 
routine was started in the cuu or 
X' cuu 1 format. 'uraddr' iray be 
omitted only if the AUTOSTR 
generation option is specified. 

additional 

specifies the number of 
additional copies to be made. It 
is entered in the fcrir of one or 
two numeric characters. 

If you have used the display option and 
wish to increase the copy counter, make 
sure that you have enough time to complete 
the alter option for example, by making 
the device being used not ready. 
Otherwise, the alter option will be 
applied to the next job entry. 



userid specify the destination of the 
ALLUSERS cutput. 'userid' is valid if it 
LOCAL is contained in the Userid List, 
which is created when POWER is 
generated. 'ALLUSERS' specifies 
that output will be available to 
all users on a read-only basis. 
Only the central installation 
operator may delete jcb entries 
with the 'ALLUSERS' destination. 

LOCAL specifies that the output 
will be directed to the local 
output queues . 

queue specifies the queue to which the 
lccal output is tc be directed in 
the yyy format. it allows 
separate handling of print and 
punch output. 



Examples 



1. Display copy counter: 



YYY = PRT or PUN 

If queue is not specified, all 
cutput is directed to bcth the 
lccal print and punch queues. 



BGPRT,00E 
F2PUN,00D 
PRT # 00E 
X'OOD' 



2. Alter copy counter: 

M BGPRT,00E # 12 
M F2PUN,00D,03 
M 00E,21 



O Co mmand (Output) 



Examples 



O BGJCB1 

O EG JCB2, 2, ALLUSERS 

BGJCB3, , LOCAL 

EG JCB4 , , LOCAL , PRT 



P Command (Stop) 

The P command stops a reader, writer, cr 
RJE routine. It can also be used to stop 
and checkpoint a punch writer routine for 
a 2560 MFCM or 5425 MFCU. 



The O command allows the central 
installation operator to change the output 
destination of an RJE job entry. 



Format 



O name , [number] , 



[userid 
ALLURSERS 
LOCAL [, queue 



3 



name Specifies the name of the job 
entry. It may be from one to 
eight alphameric characters. 

number Specifies the number assigned to 
the job entry by POWER when the 
job entry is logged in the input 
queue. Use the D command to 
obtain the number cf the job 
entry. 'number' may be from one 
to five numeric characters; it 
allows addressing of specific job 
entries with identical names. 



Format 

queue, [uraddr] ,[EOJ 

.Checkpoint. 

P (icaddr |~#EOJ 

CHECKPOINT. 
,RJE,lineaddr 



,[EOJ 1 

Checkpoint J 
I",eoj 1 
|_, checkpoint] 



queue Specifies the queue for which 
the reader cr writer was 
started in the xxyyy cr yyy 
format, where 

XX = BG, F4, F3, F2, or Fl 
yyy = RDR, PRT, cr PUN 

A queue specification in the 
yyy format indicates a 
partition- independent routine. 
If 'queue* is emitted, POWER 
stops the reader/writer routine 
that is active on the device 
specified by 'ioaddr'. 



i 
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. I ioaddr 



EOJ 



Specifies the address of the 
I/O device for which the 
routine was started in the cuu 
or X'cuu' format. 'ioaddr' may 
be omitted only if the AUTOSTR 
generation option is specified. 



If the reader routine was 
started to a card reader and a 
3540, specify the card device 
for cuu. 

Causes the punch routine to 
stop at the end of the job 
entry. 

If EOJ is omitted, the 
indicated routine stops after 
the current DATAFIL reccrd has 
been processed. 



CHECKPOINT Specifies that a punch routine 
for the 2560 or the 5425 is tc 
be checkpointed and stopped in 
order to start another POWER 
routine for the same unit. 
After this other routine has 
terminated, punching of the 
interrupted job entry can be 
resumed from the checkpoint 
with the RESTART option of the 
S command. 

RJE Specifies that the command is 
directed to an RJE routine. 

lineaddr Specifies the line for which 

the RJE routine was started in 
the cuu or X'cuu' format. 



The message for a stepped reader/writer 
routine is 

1Q77I STOPPED xxycuu 

where y = R for a reader routine 

T for a print routine, or 
P for a punch routine 

The message for a stepped RJE routine is 

1R29I devicetype ROUTINE HAS BEEN 
TERMINATED RJE cuu 

where device type = {2770,2780,3780} 
line address = cuu 

Examples 

P BGRDR,00C 

P F2PUN,00D,EOJ 

P PUN, 00E, CHECKPOINT 

F F2PRT,00E 

P PRT , 0E 

P 00E 

P 00E,EOJ 

P RJE, 031 



R Command ( Release ) 

The R command releases a job entry from 
the hold state in the specified queue. If 
there are no job entries in the queue, 
POWER issues the following message on 
SYSLCG. 

1Q06I QUEUE IS EMPTY 



Fcrirat 



) 



If an RJE or reader routine was preparing 
a job entry in the input queue when the P 
command was entered, input processing is 
terminated immediately. The job entry 
being read in must be reentered. 

If you stop a rea<3»)r routine using a 
5425, press the ENPRO key to clear the 
card path before starting another routine 
to this device. Otherwise, results with 
the next routine will be unpredictable. 

If an RJE or output routine was 
punching or printing output, the P command 
causes termination of output processing. 
The output is not deleted from the output 
queue and will be printed or punched when 
the routine is started again. 

Unless an emergency exists, you should 
use the I command to determine the status 
of the remote terminal before ycu stop an 
RJE routine: 

POWER acknowledges the P command with a 
message. 



queue 



queue 



name 



number 



I, name [ , number] j 
[,ALL] | 

,priority ) 

Specifies the queue to which the 
R command is directed in the 
xxyyy format, where 

xx = BG, F4, F3, F2, cr Fl 
yyy = RDR, PRT, cr PUN 

Specifies the name of the job 
entry. It may contain from one 
to eight alphameric characters. 

Specifies the number assigned to 
the job entry by POWER when the 
job entry is legged in the input 
queue. Use the D command to 
obtain the number of the job 
entry. 'number' may be from one 
to five numeric characters; it 
allows addressing cf specific 
job entries with identical 
names. 
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ALL Specifies that all job entries 

in the specified queue are to be 
released froir the hold state. 

priority Specifies that all job entries 
in the specified queue with the 
specified priority are tc be 
removed from the hold state. 
Priority is specified by Pn, 
where n is a numeric character 
from to 9. Nine is the 
highest priority. This operand 
is not valid if PRIORTY=NO was 
specified during POWER 
generation. 



Examples 

R BGPRT, ASSEMBLY, 26 
R F2PRT f ALL 
R BGPUN,P3 



(priority option) 



S Command (Start) 



The S command starts a reader, writer, or 
RJE routine. 



Format 

queue, [ioaddr] , [buffers], (tapeaddr) 

(class ) 
queue, [ioaddr] , [buffers] , [RESTART] 

queue, [duaddr] , [buffers] , [ ' filename * ] ,| 
[vols] , [S] 

queue, craddr, [buffers] , duaddr 

RJE,lineaddr [ ,type] 

RJE, lineaddr, type [ ,2540, cuu] 

queue Specifies the queue of the 
routine in the xxyyy or yyy 
format, where 

xx = BG, F4, F3, F2, or Fl 
yyy = RDR, PRT, or PUN 

A queue specification in the yyy 
format indicates a partition- 
independent routine. 

uraddr Specifies the I/O device for 
which the routine is tc be 
started in the cuu or x'cuu' 
format. 'uraddr' iray be emitted 
only if the AUTOSTR generation 
option is specified. 

buffers Specifies the number of I/O 
buffers to be assigned to a 
routine. For a reader or print 
routine, 'buffers' is specified 
as 1 or 2. 



Fcr diskette input, the reader 
routine will attempt to get 
sufficient buffer space tc hold 
all records from one diskette 
track, regardless of the number 
of buffers specified. 



Fcr punch routines, buffers may 
be specified as two numeric 
characters. The first character 
specifies the number of buffers 
(1 or 2) to be assigned to the 
routine. The second character 
specifies a pause cede (0, 1, 
or 2) . 

Specifying indicates that the 
forms number given in the * $$ 
PUN statement is not to be 
printed out en SYSLCG , and the 
routine is not to pause between 
jcb entries. 

Specifying 1 indicates that each 
fcrm number should be printed on 
SYSLOG and that the routine 
should pause before processing 
each job entry. 

Specifying 2 indicates that every 
ether form number should be 
printed and that the routine 
should pause before processing 
every other jcb entry. 

If the second character is 
emitted, zerc is assumed. 



tapeaddr Specifies the address of the tape 
drive that contains print or 
punch images. It is entered in 
the cuu or X'cuu* fcrmat. 

This parameter is necessary if 
cutput spooled en tape by POWER 
is to be printed or punched by 
this routine. 

Eefore a routine can be started 
tc use a given device, any other 
routine using that device must be 
stepped or canceled. 

Ncte: Tape must be pesitioned 
correctly before starting a tape 
writer. 



class Specifies the class with which 
the writer routine is tc be 
associated. Up to four classes 
may be specified in the fcrm cf 
an alphabetic character string. 

Note: The class parameter does 
net apply tc a tape writer. 



( 
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RESTART Specifies that the punch routine 
is to resume processing at the 
point where it was interrupted by 
a P command with the CHECKPOINT 
option (for IBM 2560 MFCM and 
5425 MFCU only). An example cf 
checkpointing and restarting a 
routine using the IBM 2560 and 
5 425 is given in DOS/ V S O per ating 
Procedures, GC33-5378. 



' filename' 

Is the name of the 
to be read; it must 
to the filename in 
on the diskette. C 
alphameric characte 
blanks, may be ente 
the quotes. If thi 
omitted, POWER will 
first non-protected 
the diskette curren 
the 3540. 






) 



diskette file 
be identical 
the HDR1 label 
ne to eight 
rs, including 
red between 
s parameter is 
read the 
file found on 
tly mounted on 



vols Is the maximum number of diskette 
volumes to be read. Any number 
from 1 to 255 may be specified; 
the default value is 1. The 
reader routine terminates when 
that many diskettes have been 
read or when EOF is reached. 

S Specifies that volume sequence 
checking is desired. If S is 
entered, the sequence number of 
the first volume must be 1, the 
number of the second volume must 
be 2, and so on. 

craddr Specify the card reader (craddr) 
duaddr and the diskette unit (duaddr) in 
the cuu or X'cuu' format if both 
devices are used for input to the 
reader routine. In this case, 
filename, vols, and S are speci- 
fied in the * $$ RDR statement. 

If a reader routine is started to 
a 354 diskette unit in the 
format 

S queue , duaddr,, buffers 

[ , 'filename' ] [ ,vols] [ ,S] 

the specified file must consist 
of job entries in the form of 80 
or 81 character records. These 
records are stored as 80 
character card images on the 
POWER DATAFIL (the first 
character of 81 character records 
is removed) . POWER handles JECL 
and JCL card images from the 3540 
file as it does those from a card 
reader. During execution the 
card images from the diskette 
file are handled as card input 
from the SYSIN card device. 



RJE Specifies that the command was 
given to start an RJE routine. 



lineaddr Specifies the line for which the 
RJE routine is to be started in 
the cuu or X'cuu' format. 



type Specifies the wcrk station device 
type. 'type' may be specified as 
cne of the fcllcwing: 

2770 2770,128 
2780 2770,256 
3780 2770,512 

The record number after 2770 
indicates the buffer size of the 
terminal. 



2540, cuu Specifies together with the 

operands RJE, lineaddr and type 
that an RJE simulator routine is 
tc be started. 



Examples 

S BGRDR,X'00C 

S BGPRT,00E,2 

S F2PUN,00D,20 

S RDR,0 0C 

S BGPRT,00E, ,285 

S PRT,00E,,ABCD 



(partition- independent 

routine) 

(tape writer routine) 
(partition- independent 

routine of classes 

A-D) 



S RJE, 02 

S RJE, 030, 2770 

S RJE, 035, 2780 



If ycu are using a 256 
you need net wait for 
the current punch jot 
another routine, for e 
routine. You can inte 
by specifying CHECKPOI 
start the reader rcuti 
completion of the read 
punch jot by means of 
of the S command. 



MFCM or 54 25 MFCU, 
the completion of 
in crder tc start 
xarrple, a reader 
rrupt the punch job 
NT in the F command, 
ne, and - upon 
er job - restart the 
the RESTART operand 



Assume that you are using a 5425 MFCU 
at address '00C and that you must stop a 
punch job named LARGE to read in more 
input tc the background partition. Enter 
the following command: 

P 00C, CHECKPOINT 



A checkpoint is taken, the punch jcb is 
stopped, and the following messages are 
issued: 

1Q66I BG LARGE 00027 HAS EEEN CHECKPOINTED 
1Q77I STOFFED BGP00C 
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You can now start the reader routine by 
entering 

S BGRDR, 00C 

After the reader routine has completed 
reading the new input, you can restart the 
interrupted punch job by entering 

S PUN, OOC, , RESTART 

This will cause the message 

1Q6 8I EG LARGE 00027 HAS BEEN RESTARTED 

to be issued, and the punch routine 
resumes where it left off when the punch 
job was interrupted. 

T Command (Restart) 

The T command restarts the printed output 
of a job entry from the beginning or from 
a specified page. 

Format 



I writer [ ,uraddr] 
writer, turaddr] , count 
uraddr t, count] 



writer Is specified in the xxPRT or PRT 
format, where 

xx = BG, F4, F3, F2, or Fl 

A specification of PRT (without 
the partition identifier) 
indicates a partition-independent 
writer routine. 

If 'writer' is omitted, POWER 
restarts the job entry output 
processed on the device specified 
by 'uraddr ' . 

uraddr Specifies the I/O device for 

which the print writer routine 
was started in the cuu or X'cuu' 
format. 'uraddr' may be omitted 
only if the AUTOSTR generation 
option is specified. 

count Is specified as a signed or 

unsigned value frcir to 999. A 
plus sign indicates pages 
forward, a minus sign indicates 
pages backward from the 
interrupted page. No sign 
indicates a specified page count 
from the beginning. If the 
operand is omitted, printing 
resumes from the first page. 

If the page count with a minus sign is 
higher than the number of printed pages, 
printing also resumes from the first page. 



POWER does not acknowledge the T 
command with a message. However, the 
device with which the routine is 
associated will continue with the output 
after positioning to the new page. 

Page numbering is based on the count of 
the 'skip to channel 1* commands and not 
en the actual headline numbers. 

Examples 

T BGPRT,00E restart from the beginning 

T F2PRT,00F,10 restart from page 10 

T 00E,+100 restart 100 pages past the 

last page previously 

printed 



( 



Z Command (Trace) 

The diagnostic trace c 
ally meniters TIB (tas 
contents, QFILE record 
contents, and DATAFIL 
are generated as a use 
EIAG=YES. The trace i 
in a POWER wrap-around 
the information, obtai 
instance, the dump pre 
command. Look up the 
in the dump. The wrap 
starts immediately aft 
The first four bytes o 
the address of the las 
written intc the buffe 



Format 

1. DUMP option: 



omirand Z cendition- 
k information block) 

format and 
records. These aids 
r option with 
nfermatien is stored 

buffer. To access 
n a POWER dump, for 
duced ty the KILL 
constant ' LOGADDR= ' 
-arcund buffer 
er the constant, 
f the buffer contain 
t entry which was 
r . 



'TIE[,QFL] [,DFL] 
|QFL[,DFL] t,TIB] 
Z DUMP, <DFL[, TIE] [,QFL] 
[END 
lLST 



2. TRACE option: 



TRACE 



SVC 

TSK[,SVC] 

END 

LST 



TIE Specifies that the contents of the 
TIB are to be written in the 
wrap-around buffer. 

QFL Specifies that all write operations 
to CFILE are to be written in the 
wrap-around buffer. 

EFL Specifies that all write operations 
tc DATAFIL are to be written in the 
wrap-around buffer. 



< 
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SVC Specifies that any active trace is 
terminated, and an SVC trace is 
started. The information is 
collected in the wrap-around buffer. 
One four-byte entry is itade fcr each 
SVC 0. The first byte contains the 
SVC code (always 0) and the last 
three bytes contain the SVC address. 

TSK Specifies that any active trace is 
terminated, and routine selection 
trace is started. All routines are 
traced except 'NO WORK', 'QFILE', and 
* DATAFIL' routines. The information 
is collected in the wrap-around 
buffer in eight-byte entries. The 
first three bytes of the entry 
contain the ID of the routine or the 
RJE line number, the fourth byte 
contains the TIB acticn code, the 
fifth byte the TIB status code, and 
the last three bytes contain the TIB 
address. If TSK and SVC are 
specified, both traces are active in 
the wrap-around buffer. 

LST Specifies that the current status of 
the diagnostic operation is tc be 
listed on SYSLOG. This option does 
not change the status itself. 

END Specifies that the diagnostic 

operations are to be terminated. 



Z DUMP, TIB, DFL 

Z BUMP, DFL, QFL 

Z DUMP, QFL, DFL, TIB 

Z DUMP, LST 

Z DUMP, END 

Z TRACE, SVC 

Z TRACE, TSK 

Z TRACE, SVC, TSK 

Z TRACE, LST 

Z TRACE, END 



POWER RJE TERMINAL COMMANDS 



Remote Job Entry (RJE) is an extension of 
POWER and allows you to submit job entries 
from remote locations via IBM 2770, 2780, 
or 3780 terminals for processing at a 
central installation under DCS/VS. 

Communication between the central 
installation and the terminal is possible 
at all times via messages. Messages froir 
the terminal to the central operator are 
immediately printed on SYSLCG. Messages 
from the central operator to the terminal 
are stored in a message queue and printed 
on the terminal printer only if requested 
by the terminal user by a terminal 
command. 



FUNCTION CF POWER RJE TERMINAL COMMANDS 

POWER RJE terminal commands are used to 
control job entries that are entered at a 
terminal fcr processing at a central 
installation. They may have four 
different functions: 

1. Define the status of a terminal: 

RJSTART 
RJEND 
LOGON 
LOGOFF 

2. Manipulate job entries and associated 
output: 

OUTPUT 

CONTINUE 

DELETE 

3. Provide job entry and system 
information: 

STATUS 
BRDCSTR 

4. Communicate with the central operator: 

MSGR 

The RJSTART command is accepted only when 
the terminal is in the inactive state. 
The LOGON and RJEND commands are accepted 
when the terminal is in the active or in 
the processing state. All other terminal 
commands are accepted only when the 
terminal is in the processing state. 
(Terminal states are described in the 
manual DOS/VS Syste m Manage ment Guide , 
GC33-5371.) 



FORMAT OF POWER RJE TERMINAL COMMANDS 

POWER RJE terminal commands are entered as 
punched cards through the terminal reader. 
Each command must be completely contained 
in one punched card; continuation cards 
are not permitted. The format of POWER 
RJE commands is shown in Figure 19. 

POWER RJE terminal commands must be 
placed either ahead cf the first jcb entry 
made during a terminal session, or between 
jet entries, or after the last jcb entry 
of a terminal session. 



DESCRIPTION OF POWER RJE TERMINAL COMMANDS 

Figure 20 lists all terminal commands and 
shows what they do. Following this list 
is a detailed description cf each command, 
including a discussion of the operands. 
The commands are described in alphabetical 
order. 
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Operation Field 







6-71 



Operand Field 



© 



Comments Field 



© 



72 | 



73-80 



I 
I 
| Sequence Field 

I 



© 



* •• in columns 1 through 4 identify the card as terminal command. 



© 
© 



The operation field defines the operation tc be performed. This field must be 
preceded by one or more blanks. The operation field is terminated by a blank. 

The operand field, if required, contains one or more parameters separated by 
commas. The operand field has no fixed length. A blank terminates the operand 
field; therefore, none of its parameters may contain blanks. The only exception 
is the operand of the MSGR command, where blanks may appear as part of the 
message text. If the command contains a comments field and the operand field is 
omitted, the omitted operand field is indicated by a comma preceded and followed 
by blanks. 



© 
© 



The comments field is optional, 
has no fixed length. 



It may contain any desirable information and 



The sequence field is optional and contains up to eight characters that may be 
used to identify the command. Sequence numbers are useful when a number cf 
commands with the same operation code is submitted from one terminal. POWER RJE 
returns the sequence number in all responses to and diagnostics of terminal 
commands. This allows the terminal operator to correlate the commands he 
entered with the responses he received. 



Figure 19. Format of POWER RJE Terminal Commands 



Command 



I What it does 



I" 



* 




BRDCSTR 


* 




CONTINUE 


* 


• • 


DELETE 


* 


• • 


LOGOFF 


* 


• • 


LOGON 


* 




MSGR 


* 




OUTPUT 


* 




RJEND 


* 




RJSTART 



STATUS 



Requests a copy of 
broadcast messages. 
Specifies the disposition 
of interrupted output. 
Removes job entry from the 
specified queue. 
Ends a terminal session 
started by * . . LOGON. 
Begins a terminal session 
for remote job entry under 
POWER RJE. 

Sends a message to the 
central operator. 
[Requests the output of 
processed job entries. 
Detaches a terminal from 
POWER RJE at the central 
installation. 
! Attaches a terminal to 
POWER RJE at the central 
installation. 

Obtains a status report on 
one or more RJE job entries 
| in the specified queue. 



J 



Figure 20. POWER RJE Terminal Commands 
and What They Do 



ERDCSTR Command 



Eroadcast messages are entered into the 
POWER message queue by the central 
operator, by means of a E (broadcast) 
command. 



The ERECSTR command enables the 
terminal operator to obtain a copy of 
broadcast messages fcr his terminal. 
POWER RJE responds to this command by 
returning a copy of the system broadcast 
messages to the terminal. These messages 
contain information cf general interest to 
all RJE users or to specific users. They 
are retrieved only on request from a 
terminal . 



Messages for a specified user are 
deleted after a copy has been printed at 
the terminal. 



Format 

* . . BRDCSTR (no operand) 



< 
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CONTINUE Command Fcrirat 



\ 



Output may be interrupted when operator 
intervention at the terminal is required 
because, for example, forms on the 
terminal printer must be changed. The 
interrupted output is held until the 
appropriate CONTINUE command is 
transmitted. 



) 



Interruptions that require a CONTINUE 
command to be submitted cause a message to 
this effect to be printed. Then a card is 
read. If it is not a CONTINUE card, the EEGIN 
input stream is flushed in preparation for 
the transmission of the CONTINUE command, 
and a message is written to the terminal 
printer stating that the job stream was 
flushed. If the CONTINUE command is net 
transmitted within 28 seconds, a time-out NO 
will occur. 

Following a time-out, the system 
reissues the read request until the 
generated RETRY count is exhausted, at HOLD 
which time the work station is detached 
from the RJE system. If the terminal is 
detached, the interrupted output is saved, 
and the terminal operator may or may not 
receive the appropriate ending message, 
depending upon the component interrupted. 



To reinstate his user session, the 
terminal operator must resubmit an RJSTART 
command and a LOGON command. The LOCAL 

interrupted output must be requested via 
an OUTPUT command. The output is then 
transmitted from the beginning, but the 
terminal operator can skip printed output 
to any subsequent page by interrupting the PAGE 
output and submitting an appropriate 
CONTINUE command. 



The CONTINUE command provides six options: 

1. Transmit the output, starting with the 

block of records being written when count 
the output was interrupted (the 
command does not require an operand) . 

2. Transmit the interrupted output from 
the beginning. 

3. Delete the output. 

4. Hold the output until it is requested 
by an OUTPUT command. 

5. Change the destination of output to a 
local output writer. 

6. Page forward or backward from the 
interrupted page or from the beginning 
of the printed output. 



CONTINUE TBEGIN 
NO 

HOLD 
LOCAL 
_PAGE [ ,CCunt], 



rc operand 

Specifies that transmission of 
data is to te resumed with the 
output data block that was being 
transmitted when the output was 
discontinued. 



Specifies that the terminal 
operator desires transmission of 
the job entry's output from the 
beginning. 



Indicates that the terminal 
operator desires the deletion of 
the job entry's output. 



Specifies that the job entry's 
output is to be placed in the 
hold state and will be requested 
via an OUTPUT command at some 
later time. This option has 
particular significance when a 
change of forms is required and 
the forms are net immediately 
available. 



Changes the destination of job 
entry's output to a local output 
writer. 



Allows the terminal operator to 
page forward cr backward up tc 
9 99 pages from the interrupted 
page or forward up to 999 pages 
from the beginning of the job 
entry's printed output. 



Is specified as a signed cr 
unsigned value of froir to 999. 
A plus (+) sign indicates page 
forward, minus (-) sign indicates 
page backward from the 
interrupted page. No sign 
indicates a specified page count 
from the beginning. If the 
operand is omitted, printing is 
resumed from the interrupted 
page. A page count beyond the 
limits of the jcb being printed 
causes the following: 

a. If the user specifies too 

large a backward page count, 
printing starts from the 
beginning . 
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b. If the user specifies a 

forward page count that goes 
beyond the last page, a 
message is printed informing 
him of the maxiiruir nuirber of 
pages in the job entry and 
requesting another CONTINUE 
card. 



Note to 2770 and 3780 terminal users 



A data buffer 
is being print 
is interrupted 
buffer has bee 
first data buf 
no-operand spe 
lost data. It 
that the PAGE 



is being filled while data 
ed. If printing of output 

after the second data 
n filled but before the 
fer completes printing, a 
cification may result in 

is therefore recoirirended 
option be specified. 



Note to 2780 terminal users 

From two to seven records will be printed 
with each BTAM write operation if your 
terminal is equipped with the 
multi-record-transmission feature . 
Specifying no operand may result in 
duplication of one or more records if the 
interruption occurred before the write (or 
punch) operation of the last block had 
been completed. 



DELETE Command 

The terminal operator can use the DELETE 
command to cause either of the following: 

• Delete a specific job entry previously 
submitted by him. 

• Delete all job entries previously 
submitted by him. 

The DELETE command does not reircve named 
data files created by the job entry 
specified for deletion. The command is 
not necessary to remove output which has 
already been returned to the terminal 
user. All references to a job entry 
processed by POWER RJE are removed after 
the output is returned to the user. 



Format 



DELETE queue, (name [, number] 
(ALL 



queue Specifies the queue to which the 
DELETE command is directed in the 
xxyyy format, where 

xx = partition to which the job 
entry was assigned fcr 
execution: EG, F4, F3, F2, 
or Fl 



yyy = RDR for reader 
PRT for printer 
PUN for punch 

name Specifies the name by which the 

job entry is known to POWER. The 
specified name may be frcm one to 
eight alphameric characters long. 
Each job entry name is qualified 
by a number assigned to it by 
POWER. Therefore, if the 
possibility of duplicate job entry 
names exists, that number should 
be specified also. If a duplicate 
name exists and the number is not 
specified, the first job entry 
found with the specified name is 
deleted. 

number Specifies the 1 to 5-digit number 
assigned to the jet entry by POWER 
RJE. 

The terminal operator may use the 
STATUS command to inform himself 
atcut the correct specification 
for 'number' . 

ALL Requests to delete all job entries 
in the specified queue that were 
submitted under the 'userid' 
specified in the LOGON command for 
the current session. 

LOGOFF Command 

The LOGOFF command indicates that the 
terminal user currently legged on has 
completed his session. After receiving a 
LOGOFF command, POWER RJE refuses job 
entries from the terminal until another 
LOGON command is submitted. 

Output to be returned to the current 
terminal user can be returned enly during 
a session that was started with his userid 
in the LOGON command. Whenever a terminal 
user ends a session, a message appears on 
the central operator's console, 
identifying the user and indicating the 
time he legged off. 

Format 

* .. LOGOFF (no operand) 

If the central system receives a valid 
LOGON command from a terminal with a 
session in progress, the central system 
legs off the current user and legs on the 
user identified in that IOGON command. If 
the central system receives an RJEND 
command from a terminal with a session in 
progress, it legs off the user and 
logically detaches the terminal. In other 
words, the terminal operator may emit the 
IOGOFF command when changing user sessions 
or detaching the terminal. 



( 



( 



( 
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LOGON Command 



OUTPUT command 



Following an RJSTART command, a user at a 
terminal which is logically attached tc 
POWER RJE issues a LOGON command to start 
his session. The command identifies the 
user to POWER RJE and allows him access to 
the system. By checking the 'userid' in 
the LOGON command, POWER RJE guarantees 
that only authorized users can submit 
input or request output from the system. 
The LOGON command remains in effect until 
another LOGON, a LOGOFF, or an RJEND 
command is entered by the terminal 
operator. 

A terminal user who has mere than one 
terminal available may log on at two 
terminals at one time to permit the use of 
one line for input and another for output, 
two lines for output, or two lines for 
input. 

Format 

* . . LOGON userid 



The OUTPUT command can be used tc request 
the output of job entries whose output 
destination is either the terminal 
operator's 'userid' or 'ALLUSERS'. 



A job entry's output destination can be 
specified : 



explicitly in the * $$ JOB statement, 



implicitly, if, in the * $$ JOB 
statement for a remotely submitted job 
entry, no 'teririd' or 'userid' was 
specified (in this case,, POWER RJE 
assumes that the jcb entry's output is 
to be made available only on the 
terminal user whe was logged en when 
the entry was submitted) , cr 



userid Specifies the name assigned to the 
terminal user by the installation. 
If the 'userid' specified in this 
parameter is not valid, POWER RJE 
rejects the command and a 
corrected statement must be 
submitted. The 'userid' may 
consist of up to eight alphameric 
characters. Whenever a terminal 
user begins a session, a message 
appears on the central operator's 
console identifying the user and 
indicating the time the terminal 
operator logged on. 



explicitly by means cf an (output) 
command issued by the central 
cperatcr. 



If processing of a particular job entry 
has not finished when the output is 
requested, the job entry is not in the 
output queues and POWER RJE returns a 
message indicating that the job entry was 
net found. The OUTPUT command must be 
resubmitted after processing of the job 
entry has finished. The OUTPUT command 
provides the following options: 



) 



M SGR Command 

Messages sent to the central operator by 
means of the MSGR command are displayed on 
SYSLOG when they are received. 



Format 



MSGR M, 'text' 



M, 'text' Specifies the message text tc be 
sent. The message text must be 
enclosed in single quotation 
marks. The text itself may 
include up to 40 printable 
characters and blanks. 
Continuation lines are net 
permitted. Any messages 
requiring more than 4 
characters of text must be sent 
by multiple commands. Quotation 
marks contained within the 
message text must be doubled, 
and each quotation mark counts 
as one text character. 



The terminal operator may request the 
output cf a specific job entry if that 
jcb entry's output destination is 
either the requesting operator's 
•userid* or 'ALLUSERS'. 

The terminal operator may request all 
output whose destination is identical 
with the requesting operator's 
'userid' . 

The terminal operator may request the 
output whose destination is 'ALLUSERS' 



Format 

* .. OUTPUT f name [, number]' 
ALL 
ALLUSERS 



name Indicates that the request is 

for the output of the job entry 
named in the parameter. 
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number Specifies the number assigned to 
the job entry by POWER RJE when 
the job entry was logged in the 
input queue. The terminal 
operator may use the STATUS 
command to obtain the correct 
specification for 'number', 
'number', which may be specified 
as a decimal number of one to 
five digits, is needed only if 
job entries with identical names 
were submitted. 



ALL Specifies that POWER RJE is to 
return to the terminal operator 
all the available output 
destined for him in accordance 
with his 'userid'. 

ALLUSERS Specifies that POWER RJE is to 
return to the terminal operator 
all the output available on a 
read-only basis with destination 
' ALLUSERS ' . 

If the terminal operator is not an 
authorized recipient of the requested 
output, POWER RJE returns either of the 
following messages: 

1R66I JOB ENTRY name NOT FOUND (if 
' name' 

was specified) 

1R69I NO OUTPUT WAITING (if 'ALL' or 
| 'ALLUSERS' was specified) 



RJEND Command 

The RJEND command allows a terminal user 
tc logically detach his terminal from 
POWER RJE. 



Format 

* .. RjEND (no operand) 

Nc output cf the job entry is returned to 
the terminal after the RJEND command has 
been received. POWER RJE transmits the 
message 

IR71I RJEND PROCESSED 

in response to the RJEND command. 



( 



If the terminal is 
central system via a s 
the connection is brok 
successful termination 
should not disconnect 
he has received the me 
that the RJEND command 
further communication 
terminal resumes RJE a 
RJSTART ccrrmand. 

RJSTART Command 



connected to the 
witched connection, 
en. Tc ensure 
, the operator 
his terminal before 
ssage indicating 

was accepted. No 
occurs until the 
ctivity with an 



The RJSTART command logically attaches a 
terminal to POWER RJE, that is, it 
indicates to POWER RJE that remote job 
entry is intended from the specified 
terminal. 



( 



The same messages are returned to the 
terminal operator if he requests output of 
a job entry that was not entered 
previously. 



A user is automatically a valid 
recipient of a job entry' s output if he 
submits the job entry, unless the 
destination field in the * $$ JOE 
statement specified another 'userid'. Job 
entries with the destination 'ALLUSERS' 
will not be purged when the output 
function has completed. 



The RJSTART command must be the first 
statement received from an inactive 
(logically not attached) terminal. In 
addition tc identifying the terminal to 
POWER RJE, this command allows the 
terminal operator to request broadcast 
messages before continuing RJE processing. 
Communication proceeds between the central 
system and the terminal after a valid 
RJSTART command has been received. Once 
the terminal is logically attached, a 
terminal operator may gain access to the 
central system by logging en at the 
terminal with the LOGON command. 



No OUTPUT command is needed to retrieve 
a job entry's output if the entry is 
completely processed and 

• the user who submitted the jcb entry is 
still logged on 

• that output was neither placed into the 
hold state nor directed tc another 
terminal user, and 

• the transmission of another job entry 
finishes. 



Format 



RJSTART 



termid [ ,BRDCST] , ttermtype] , 
[buf size] , [NOPUNCH] 



termid specifies the name cf the 

terminal. The specified name 
must be contained in POWER RJE's 
list of authorized user 
identifications. The name may 
censist cf from one tc eight 
alphameric characters. If the 
specified 'termid' is net 



( 
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> 



recognized as a valid name, POWER 
RJE rejects the command, and a 
corrected statement must be 
submitted. 

BRDCST specifies that a copy of the 
broadcast messages for the 
specified 'termid' is desired 
before RJE operation is 
continued. Messages for the 
specified "termid* are deleted 
after a copy has been printed at 
the terminal. If this parameter 
is omitted, no messages are 
broadcast at this time. 

termtype Specifies the device type, which 
may be 2770, 2780, cr 3780. 
Default is the device generated 
into the RJEBLK macro (see note 
below) . 

bufsize Specifies the size cf the buffer 
for 2770 terminals. The values 
may be 128, 256, cr 512. For 
other terminal types, the 
parameter is omitted. Default 
for the 2770 is 128. (see note 
below. ) 

NOPUNCH Specifies to the system that the 
terminal has no punch. 

The RESTART card must have at least two 
consecutive blanks somewhere within the 
first 80 columns for space/compress/expand 
recognition by POWER. 

Note: The parameters termtype and bufsize 
can be used to override the parameters 
DEVICE and BUFSIZE in the POWER generation 
macro RJEBLK. If different terminal types 
are used with the same central 
installation, termtype and bufsize should 
always be specified. 

If the terminal operator desires to resume 
RJE activity after the terminal has been 
logically detached from the system (after 
an RJEND command or a system failure) , he 
must resubmit the RJSTART command. 

Only the LOGON command or the RJEND 
command may follow the RJSTART command. 



STATUS Command 

RJE returns the status of only those jcb 
entries which are currently in the 
specified queue and which have the 
terminal operator's userid cr ALLUSERS 
specified as output destination. The 
STATUS command provides the following 
options: 

• The terminal operator can request the 
status of a specific job entry. 



• The terminal operator can request the 
status of all job entries which are in 
the specified queue and fcr whose 
output he is an authorized recipient. 

In response, POWER RJE transmits the 
following: 

• Name cf job entry and numter 

• Priority 

• Number cf logical records asscciated 
with the job entry in the specified 
queue 

• Disposition of the job entry in the 
RDR, PRT, and PUN queues as specified 
by the JECL statenents for the entry. 

If PCWER RJE is unable tc provide the 
above information in response to a STATUS 
command, it transmits either of the 
following messages: 

1R66I JOE ENTRY name NOT FOUND (if 'name' 
was specified) 

1R76I queuename QUEUE IS EMPTY (if 'ALL' 
was specified) 

POWER RJE immediately returns the status 
cf only these job entries which satisfy a 
STATUS command at the time the command is 
received. POWER RJE dees net 
automatically return the new status of a 
jcb entry when a change cf status occurs. 



Format 



STATUS queue 



queue 



name 



", name [ , number] 
,HOLD 
, priority 
, ALLUSERS 
,ALL 



Specifies the queue tc which the 
display command is directed in 
the xxyyy format, where 

xx = partition tc which the job 
entry was assigned for 
execution: EG, F4, F3, 
F2, or Fl 

yyy = RDR fcr reader 
PRT fcr printer 
PUN for punch 

Specifies the name of the jot 
entry about which status 
information is required. Each 
jcb entry name is qualified by a 
number assigned to it by POWER 
RJE. Therefore, if duplicate 
job entry names occur, number 
should be specified also. 
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number Specifies the number assigned to 
the job entry by POWER RJE when 
the job entry was logged in the 
input queue. This (1 to 
5-digit) number is also used 
with output queue entries for 
this job entry. 

HOLD Indicates that status 

information is requested only 
for those job entries which 
satisfy the command and are in 
the hold state. 



EXAMPLES OF POWER RJE TERMINAL COMMANDS 



The following examples illustrate the 
usage of POWER RJE terminal commands. 



Example 1 - Initiate Terminal Operatio n 
and User Session 



priority indicates that status 

information is requested only 
for those job entries which were 
assigned the same priority 
number. Priority is specified 
in the form Pn, where n = any 
number from to 9. Nine is the 
highest priority. 

ALLUSERS Indicates that status 

information is requested for 
those job entries in the queue 
whose output destination is 
•ALLUSERS' . 

ALL Indicates that status 

information is requested for all 
job entries in the queue which 
the current terminal operator is 
authorized to receive. 



STMNT 1 in Figure 21 logically attaches 
the terminal to the RJE system and 
requests broadcast messages for Seattle, 
and STMNT 9 logically detaches the 
terminal. Between STMNT 1 and STMNT 9, 
three user sessions take place. District 
3 has twc sessions: The first begins with 
STMNT 2 and ends with STMNT 4, and the 
seccnd begins with STMNT 6 and ends with 
STMNT 8. In the first session. District 3 
submits jet entries fcr processing and 
requests verification that the job entries 
have been successfully entered intc the 
POWER system. In the seccnd session. 
District 3 requests all accumulated output 
which is to be returned to District 3. 
District 3A has only one session, which 
begins with STMNT 5 and ends with STMNT 6. 
Note that the LOGON command for District 3 
terminates District 3A's session. 



< 



i r 



RJSTART 
LOGON DIST3 



SEATTLE, BRDCST, 3780 



Job Entries from District 3 



STATUS BGRDR,ALL 

LOGOFF 

LOGON DIST3A 



Job Entries from District 3A 



LOGON DIST3 
OUTPUT ALL 
LOGOFF 
RJEND 



STMNT 1 
STMNT 2 



STMNT 3 
STMNT 4 
STMNT 5 



STMNT 6 
STMNT 7 
STMNT 8 
STMNT 9 



Figure 21. Example 1 - Initiate Terminal Operation and User Session 



( 
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Example 2 - Use Of BRDCSTR, MSGR, STATUS, 
OUTPUT^ and DELETE_Commands 

Example 2 in Figure 22 assuires that Class 
2 has previously submitted job entries for 
processing. The terminal is logically 
attached to the RJE system with STMNT 1 
and logically detached with STMNT 17. 
Note that STMNT 17 also defines the end of 
Class 2*s second session; no LOGOFF 
command is required. Class 2 has two user 
sessions: The first begins with STMNT 2 
and ends with STMNT 7, and the second 
begins with STMNT 11 and ends with STMNT 
17. During the first session, three 
general requests are made for status 
reports of job entries submitted fcr 
processing in the background partition. 
STMNT 6 requests any messages for Class 2. 



When these messages are transmitted, they 
are deleted from the message queue. 

During the second session, selected job 
entries are deleted and output for one job 
entry is requested. The STATUS command is 
used again in STMNT 15 and STMNT 16 to 
verify the changes made tc the EGRDR and 
EGPRT queues. 



Class 6 has a use 
STMNT 8 and ending a 
the user session was 
LOGON command for Cl 
command was not requ 
session. Class 6 req 
messages fcr its 'us 
entries, and verifie 
entry submission wit 



r session beginning at 
t STMNT 11 . Note that 

terminated with the 
ass 2; the LCGOFF 
ired. During the user 
uested any broadcast 
erid', submitted job 
d the results of job 
h the STATUS command. 



r— 

I* 

I* 

I* 

I* 

I* 

I* 

I* 

I* 
I* 



I* 
I* 
I* 
I* 
I* 
I* 
I* 
I* 



RJSTART C0URSE1 , ERDCST , 277 , 51 2 , NCFUNCH 

LOGON CLASS2 

STATUS BGRDR,ALL 

STATUS BGPRT,ALL 

STATUS BGPUN,ALL 

BRDCSTR 

LOGOFF 

LOGON CLASS6 

ERDCSTR 



Job Entries from Class 6 



STATUS BGRDR,ALL 
LOGON CLASS2 

DELETE BGRER,STUDENTI,6 

OUTPUT STUDENT 9 

DELETE BGPUN,SAMPROB 

STATUS BGRDR,ALL 

STATUS BGPRT,ALL 
RJEND 



STMNT 
STMNT 
STMNT 
STMNT 
STMNT 
STMNT 
STMNT 
STMNT 
STMNT 



STMNT 10 

STMNT 11 

STMNT 12 

STMNT 13 

STMNT 14 

STMNT 15 

STMNT 16 

STMNT 17 



\ 



Figure 22. Example 2 - Use cf ERDCSTR, MSGR, STATUS, OUTPUT, and DELETE Commands 
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Example 3 - Use of CONTIN UE Comman d 

Operator intervention is required in 
example 3 in Figure 23. The CONTINUE 
command must be used to resume processing. 

PAYROLL logically attaches the terminal 
using its own 'userid' as termid in STMNT 
1 and begins its user session with STMNT 
2. Note that the LOGON command is still 
required with the proper 'userid'. The 
terminal operator has check forms on the 
printer when the session begins. 

STMNT 3 requests the output from the 
job entry PAYCHECK, which should be 
printed on the blank check fcrirs. The 
terminal operator determines from the 
first check printed that the check forms 
are not properly aligned with the printed 
output, and he turns off the printer. The 
RJE routine transmitting the output 
receives the signal that intervention is 
required at the terminal. The RJE routine 



writes a message on the terminal printer 
indicating that the CONTINUE command is 
required tc resume transmission. The 
routine prepares to read from the terminal 
reader. If the card read is a CONTINUE 
command, it is processed by the routine. 
Otherwise, the RJEND routine flushes the 
terminal reader in preparation for the 
CONTINUE command, writes a message on the 
terminal printer indicating that the job 
stream has been flushed and prepares tc 
read from the terminal reader. The 
terminal operator prcperly aligns the 
blank check forms and requests that the 
output be restarted (STMNT 4). 



If the job entry PAYCHECK had a program 
failure resulting in a storage dump, the 
operator might change forms and use STMNT 
4 to get the dump, or he might reply with 
* .. CONTINUE LOCAL, which would make the 
output available for printing at a local 
output writer. 



i r. 



RJSTART PAYROLL, ERDCST, 2770, 128 
LOGON PAYRCLL 
OUTPUT PAYCHECK 



STMNT 1 
STMNT 2 
STMNT 3 



|. -I 

Transmission is Interrupted by the Terminal Operator 
j. ] 



CONTINUE BEGIN 
RJEND 



STMNT 4 
STMNT 5 



L J 



Figure 23. Example 3 - Use of CONTINUE Command 
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Examp le 4 - Trans mission Failu re While 
Submitting Job Entries 



In Example 4 in Figure 24 it is assumed 
that a transmission failure occurs during 
submission of Job Entry 2. 

When a transmission failure occurs, the 
terminal operator must reestablish the 
line. This action requires an RJSTART 
command to logically attach the terminal 



cnce mere, and the interrupted input must 
be resubmitted. 

As socn as the line has been 
reestablished, the terminal operator 
verifies that Job Entry 2 did net enter 
the POWER system. The operator then 
ccirpletes job entry submission by allowing 
Job Entry 3 to precede Job Entry 2 while 
he checks the status report. The operator 
again gets a status report after Job Entry 
2 is transmitted. 



,. j 

Transmission Failure During Submission of Job Entry 2 
j. 1 



\ 



RJSTART DATAPROC, ,3780,, NOPUNCH 
LOGON PR0GR1 



Job Entry 1 
Job Entry 2 



STMNT 1 
STMNT 2 



RJSTART DATAPROC, ,37 80,, NOPUNCH 
LOGON PROGR1 
STATUS BGRDR,ALL 



Job Entry 3 

Job Entry 2 (the job entry whose 

submission was interrupted 

by transmission failure) 



STATUS BGRDR,ALL 

LOGOFF 

RJEND 



STMNT 1 
STMNT 2 
STMNT 3 



STMNT 4 
STMNT 5 
STMNT 6 



Figure 24. Example 4 - Transmission Failure While Submitting Job Entries 



) 
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Example 5 - Transmission Failure While 
Re cei ving Output 

In the example in Figure 25 it is assumed 
that a transmission failure ocurs while 
receiving output. 



When a transmission failure occurs, the 
terminal operator must reestablish the 
line. This action requires an RJSTART 
command to logically attach the terminal 
and request the output once more. 



Even though the transmission was 
interrupted during receipt of the output 
frcm Jet Entry 2, the transmission 
occurred in response tc the general 
request for output. Repeating this 
request will cause Jcb Entry 2 output to 
be transmitted from the beginning. Job 
entry output is net deleted frcm the 
output queue until it has all been 
successfully transmitted. Therefore, if 
the OUTPUT command specified Job Entry 2 
instead of ALL, the command could be 
reissued after reestablishing the line. 



( 



RJSTART DATAPROC, ,2780 
LOGON PROGR2 
OUTPUT ALL 



STMNT 1 
STMNT 2 
STMNT 3 



J. ^ 

Transmission Failure During Printing of Job Entry 2 
j. \ 



RJSTART DATAPRCC, ,2780 
LOGON PROGR2 
OUTPUT ALL 
RJEND 



STMNT 1 
STMNT 2 
STMNT 3 
STMNT 4 



Figure 25. Example 5 - Transmission Failure While Receiving Output 
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LINKAGE EDITOR 



cf 7 T^ f 



The linkage editor prepares prcgrairs fcr 
execution with DOS/VS and accepts as input 
the relocatable object modules produced by 
the language translators and object 
modules produced by the CSERV programs. 
It processes these modules into program 
phases, which may be immediately executed 
or cataloged into the core image library. 

Job control calls the linkage editor 
program when a // EXEC LNKEDT control 
statement is read. Control is returned to 
job control when the link edit function is 
completed, unless the CATAL option was 
specified, in which case the CATAL 
function is completed before control is 
returned to job control. 

The linkage editor prograir can run in 
either the background or a foreground 
partition. If it runs in the foreground, 
you must assign a private core image 
library (SYSCLB). In the background 
partition, the linkage editor defaults to 
the system core image library if nc 
private core image library is assigned. 
The linkage editor issues a diagnostic 
message and terminates abnormally when you 
assign the private core image library 
across partitions. 



If the supe 
relocating lea 
write a self-r 
that program t 
virtual partit 
will produce r 
possible. The 
whether a phas 
inspecting the 
statement. 



rvisor supports the 
der, you do not need to 
elocating program to enable 
o execute in any real or 
ion. The linkage editor 
elocatable phases whenever 

linkage editor determines 
e can be made relocatable by 

origin of the PHASE 



The linkage edito 
the program to read 
to form phases from 
within the modules, 
relocates the origin 
section in the phase 
an area of storage a 
and modifies the con 
constants in the pha 



r control cards direct 
an input module (s) and 
the control sections 

The linkage editor 

of each control 
assigns each phase 
nd a transfer address, 
tents of the address 
se. 



determining the location cf each control 
section and for resolving any references 
between control sections. 

The module TXT items are then built 
into phase blocks. The RLD items (address 
constants) are modified and inserted into 
the text. A transfer address is 
determined for each phase. 



LANGUAGE TRANSLATOR MODULES 



The input to the linkage editor consists 
of object modules and linkage editor 
control cards. Each mcdule is the output 
of a complete language translator run. It 
consists cf dictionaries and text for one 
or more control sections. 

The dictionaries contain the 
infermatien necessary for the linkage 
editor to resolve references between 
different modules. The text consists cf 
the actual instructions and data fields of 
the mcdule. 



Six card types can be produced, by the 
language translators or ty the programmer, 
to form a module. They appear in the 
following crder: 

Card Type Definition 

ESD External symbol dictionary 

Ignored by linkage editor 

Text 

Relocation list dictionary 



SYM 
TXT 
RLD 
REP 



END 



Replacement to text made by 
the programmer 

End of module. 



For the format of each of these cards 
(except SYM), see "Appendix E: Linkage 
Editor Summary". 



> 



The relocation factor for each control 
section is determined and saved by 
building a table called the control 
dictionary. This table contains the 
linkage editor phase definitions and the 
module ESD items. When complete, the 
table provides sufficient information for 



The externa l sym bol dictionar y contains 
control section definitiens and 
intermodule references. When the linkage 
editor has the ESDs frcm all modules, it 
can relocate the sections and resolve the 
references. Six types cf entries are 
defined in the control dictionary. 
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wx 



PC 



LD/LR 



ER 



CM 



Definition 

Section definition: provides 
control section name, assembled 
origin and length. Generated 
by a named START or a named 
CSECT in a source module. 

Generated by Weak External 
Reference (WXTRN), which has a 
function siirilar to EXTERN, 
except that WXTRN suppresses 
AUTOLINK. The linkage editor 
treats WX as an ER, NOAUTO. 

Private code: provides 
assembled origin and length for 
an unnamed control section. 

Label definition: specifies 
the assembled address and the 
associated SD of a label that 
may be referred tc by another 
module. The LD entry is termed 
LR (Label Reference) when the 
entry is matched to an ER 
entry. 

External reference: specifies 
the location of a reference 
made to another module. ER is 
generated by EXTRN or a V-type 
address constant in a scurce 
module. 

Common: indicates the amount 
of storage to be reserved fcr 
common use by different phases. 
CM is generated by CCM in a 
source module. 



the shared virtual area and is 
indicated as SVA-eligible in the system 
directory list, the phase is also 
loaded into the SVA. 

• Load and execute mod e. An object 
module is link-edited for temporary 
storage in the core image library and 
is immediately executed. 



Assemble and execute ircde . A source 
module is assembled or compiled. The 
object module (cutput) is link-edited 
for temporary storage in the cere image 
library and is immediately executed. 



LINKAGE EDITOR CONTROL STATEMENTS 



In addition to the program cards 
previously listed, object modules used as 
input for the linkage editor include 
linkage editor control stateirents. There 
are four kinds of these control 
statements, each of which is described in 
detail further on in this section. 



PHASE 



INCLUDE 



Indicates the beginning of a 
phase. It gives the name of 
the phase and the storage 
address where it is tc be 
loaded. 



Signals that an object module 
or parts thereof are to be 
included. 



< 



* 



The relocation list dicti onar y identifies 
portions of text that must be modified on 
relocation (address constants) . 

When the linkage editor reads a module, 
it stores ESDs in its contrcl dictionary, 
writes TXT and REP items in core image 
blocks in the library, and writes RLD 
items on an RLD file. Each item that is 
identified by the language translators 
with an ESID number is reidentified by the 
linkage editor with a contrcl dictionary 
number to avoid duplication between 
modules. All programs to be executed 
under DOS/VS must be link-edited and 
stored in the core image library. The 
core image library is either on SYSRES 
(the system core image library) or on 
SYSCLB (a private core image library) . 
The linkage editor program operates in one 
of three modes: 

• Catalog mode. An object module is 
link-edited and permanently stored in 
the core image library. The cere image 
directory for cataloged phases is 
updated. If the phase is eligible for 



ENTRY 



ACTION 



Provides an optional transfer 
address fcr the first phase. 



Specifies options tc te taken. 



Gen eral Control Statement Format 

The linkage editor ccntrcl statements are 
similar in format to statements processed 
by the assembler. The operation field 
must be preceded by one or mere blanks. 
The operation field must tegin tc the 
right of column 1 and must be separated 
frcm the operand field by at least one 
blank position. The operand field is 
terminated by the first klank position. 
It cannot extend past column 71. 



Control Statem e n t Plac eirent 

If multiple-object modules are fceing 
prepared in a single linkage editor run, 
the single ENTRY statement should follow 



< 
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the last object module. The ACTION 
statement (s) must be the first record (s) 
encountered in the input streair; 
otherwise, they are ignored. 

PHASE and INCLUDE statements may be 
present on SYSRDR, SYSIPT, or in the 
relocatable library. Figure 2 6 shews the 
possible placement of the PHASE and 
INCLUDE statements. 



INCLUDE STATEMENT 




PHASE STATEMENT 


hnforp fj r<i t PHASF 






statement 










after first PHASF 






statement 


ESD 
TXT 
RLD 
REP 
END 








after END and before 
- ENTRY or next ESD 




-^ 


after last PHASE statement 






ENTRY (or next ESD) 





Figure 26. 



) 



Placement of PHASE and INCLUDE 
Statements 

INCLUDE statements within 
modules in the relocatable 
library must precede the ESD 
statement for the module. 



PHASE STATEMENT 

The PHASE statement must precede the first 
object module of each phase processed by 
the linkage editor. Under nc 
circumstances can a -PHASE ", statement occur 
within a control section. There can be 
several control sections within a phase. 
When several PHASE statements appear 
before an object module, each of the 
statements must be followed by at least 
one INCLUDE statement. Any object module 
not preceded by a PHASE statement is 
included in the current phase. 

The first (or only) object ircdule input 
for the linkage editor should include a 
PHASE control statement before the first 
ESD item. If no PHASE statement is used, 
or if the PHASE statement is in error, the 
linkage editor constructs a duiriry 
statement. This allows testing of the 
program when the LINK option is used. 
However,, the program with the dummy PHASE 



statement cannot be cataloged in a core 
image library; when the CATAL option is 
used, the job is canceled. The last (or 
enly) object module may cpticnally be 
followed by an ENTRY control statement. 



This statement provides the linkage 
editcr with a phase name and an origin 
point for the phase. The phase name is 
used to catalog the phase into a cere 
image library. This name is used in a 
FETCH cr LCAD macro tc retrieve the phase 
for execution. The PHASE statement is in 
the following format. 

PHASE name, origin [,NOAUTO] [,SVA] [,PBDY] 



At least one blank must precede PHASE. 
The operands have the following rreaning: 



name Symtclic name cf the phase. One to 
eight alphameric (0-9, A-Z, #, $,/, 
and a) characters are used as the 
phase name. The name may net be 
ALL. 



origin Specifies the lead address of the 
phase. If the origin of a phase 
was specified relative tc the 
beginning of a partition, the 
linkage editor refers tc the start 
address of the virtual partition to 
calculate the lead address cf the 
phase. 

To run a program in a real 
partition, you can 

• Link-edit the program with 
ACTION REL (see the ACTION 
statement) so that it can be 
relocated tc a real partition 
when it is loaded. 

• Write the program to be 
self-relocating . 

• Link-edit the program with a 
PHASE statement that contains 
the absolute address of the 
location within the real 
partition where the program is 
to be loaded. 



If COMMON is used, the length cf 
the largest COMMON is added to 
every phase origin, even if the 
origin is given as an absolute 
value. COMMON is located at the 
beginning of the phase with the 
lowest origin address (if multiple 
phases) . 
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The load address can be in one of 
six forms : 



1. 



symbol [ (phase) ] 

[irelocation] 
* [Irelocation] 
S t+relocation] 
ROOT 

5. +displacement 

6. F+address 



2. 

3. 

a. 



relative 
addresses 

absolute 
addresses 



A phase can be made relocatable if 
its origin is specified as a 
relative address (formats 1-4 
above). However, if the address is 
relative to another phase which is 
not relocatable, the new phase will 
not be relocatable. Refer to the 
ACTION statement for additional 
information about the relocating 
loader. 

The elements that make up the six 
forms that specify the origin 
signify the following. 



1. 



symbol; May be a previously 
defined phase name, control 
section name, or external label 
(the operand of an ENTRY source 
statement) . 

(phase) : If symbol is a 
previously defined ccntrol 
section name or a previously 
defined external label that 
appears in more than one phase, 
phase (in parentheses) directs 
the linkage editor tc the phase 
that contains the origin. The 
phase name must have been 
defined previously. 



relocation: Indicat 
origin of the phase 
being processed will 
relative to the symb 
relocation term ccns 
+ or a - immediately 
by: X'hhhhhh' (one 
hexadecimal digits) , 
(one to eight decima 
or nK. 



es that the 
currently 

be set 
cl by a 
isting of a 

f cllowed 
to six 

dddddddd 
1 digits) , 



2. 



*: The linkage editor assigns 
the next storage location in 
the virtual partition (with 
forced doubleword alignment) as 
an origin for the next phase. 

For the first PHASE statement 
in the background partition, * 
indicates that the origin is to 
be the first doubleword storage 
address after the partition 
save area, the label save area 
(if any) , and the area assigned 
to the COMMON pool (if any) . 



5. 



6. 



relocation: Indicates 
relocation of the phase 
relative tc the next storage 
location of the virtual 
partition. The format is as 
specified in item 1. 

S: If S is specified, the 
origin is determined in the 
same manner as the first PHASE 
statement in item 2. 

relocation: Indicates 
relocation of the phase 
relative tc the start of the 
virtual partition as described 
in item 2. 

ROOT: Tells the linkage editor 
that the phase that fellows is 
a rcot phase. The storage 
address assigned to the root 
phase is determined in the same 
manner as the first PHASE 
statement in item 2. Only the 
first PHASE statement is 
permitted tc specify ROOT. Any 
qualitative information (phase 
or relocation) is ignored when 
ROOT is specified. If a 
control section (CSECT) appears 
in the root phase, ether 
occurrences of the same control 
section are ignored and all 
references are resolved to the 
control section in the root. 
(This does net apply tc control 
sections and external 
references that begin with the 
letters IEM.) Control sections 
are not duplicated within the 
same phase. If any subsequent 
phase overlays any part of the 
ROOT phase, a warning 
diagnostic is displayed on 
SYSLST if ACTION MAP is 
specified. Refer also to 
ACTION Statement. 



+displacement : Allcws the 
origin (loading address) to be 
set at a specified location. 
The origin point is an absolute 
address, relative tc zero. 

displacement must be: 
X'hhhhhh' (one to six 
hexadecimal digits), eddddddd 
(one to eight decimal digits) , 
or nK. A displacement of zero 
(+0) would be used to denote a 
self-relocating program. 



F+address: This format allows 
the origin of the program that 
is being link-edited in one 



( 
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NOAUTO 



partition to be set at the 
start of another partition that 
is not allocated. If the other 
partition is allocated, ACTION 
BG or ACTION Fn has the same 
effect as F+address. 

It also indicates that an area 
is to be reserved at the 
beginning of the ether 
partition for the program name, 
a register save area, and label 
information. F should never be 
used for self-relocating 
programs. If COMMON is used, 
the COMMON start address is 
resolved to the first 
doubleword boundary after the 
reserved area at the beginning 
of the area specified by the 
F+displacement in the PHASE 
card. 

address: The absolute storage 
address of the partition in 
which the link-edited program 
is to be executed. It may be 
specified by: X'hhhhhh* (four 
to six hexadecimal digits) , 
dddddddd (five to eight decimal 
digits), or nnnnK (n is two to 
four digits) . For example, an 
address may be specified as 
+32K or +X'80OO' or +32768. 
The origin of the phase is on 
the first doubleword boundary 
after the sum of address, the 
adjustment for the save area 
requirements, the label area 
and the length of the COMMON 
area, if applicable. 

Indicates that the Automatic 
Library Lookup (AUTOLINK) feature 
is suppressed for both the private 
and system relocatable libraries. 
AUTOLINK collects each unresolved 
external reference from the phase. 
It then searches the private 
relocatable library (if assigned) 
and then the system relocatable 
library for a cataloged object 
module with the same name as each 
unresolved external reference. 
When a match is found, the module 
in the private or system 
relocatable library is link-edited 
into the phase. The AUTOLINK 
retrieved module must have an 
entry point matching the external 
reference in order to resolve its 
address. Unresolved external 
references are processed 
sequentially in alphameric order. 
Object-module cross references 
with labels identical to library 
object-module entry-point labels 
are erroneous. The use of NOAUTO 



as the last operand in a PHASE 
statement causes the AUTOLINK 
process to be suppressed for that 
phase only. (Also see ACTION 
Statement . ) 

SVA Indicates that the phase is 

SVA-eligible. This ireans that the 
phase must be reenterable and 
relocatable (link-edited for 
loading by the relocating loader) . 
When this phase is cataloged into 
the system core image library, the 
linkage editor will also have the 
phase loaded into the SVA if the 
phasename was listed in the SDL 
with an SVA operand. If the 
linkage editor finds that a phase 
that is specified with the SVA 
operand is net relocatable, an 
error message is issued and the 
SVA operand is ignored. 

PBDY Indicates that the phase is to be 
link-edited on a page boundary. 
If the current link-edit address 
is not aligned on a page boundary, 
the linkage editor uses the next 
higher page boundary address. 

Note: It is net recommended that 
PECY be specified for the first or 
only phase of a program. 

Some examples of PHASE statements follow. 



PHASE PHNAME,*+50U 

This causes loading tc start 504 bytes 
past the end of the previous phase. 



PHASE PHNAME3,PHNAME2 

This causes loading tc start at the same 
point where the loading of phase PHNAME2 
started. 

PHASE PHNAME,ROOT 

Loading begins at the first doubleword 
after the beginning of the partition, the 
partition save area, the label save area 
(if any) , and the area assigned to the 
COMMON pool (if any) . When the PHASE 
statement contains a ROOT origin, this 
PHASE statement must be the first PHASE 
statement read by the linkage editor. 
Otherwise, it is treated as a symbol. 



PHASE PHNAME,CSECT1(PHNAME2) 

This causes loading to start at the point 
where CSECT1 was leaded. CSECTl, the 
named control section, must have appeared 
in the phase named PHNAME2. 
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PHASE PHNAME,F+X'6000' 

This causes loading to start at 24K plus 
the length of the save area and label 
area. 



PHASE PHNAME,F+32K 

This causes loading to start at 32K plus 
the length of the save area and label 
area. 



when used as a module in two phases has 
two different results. When the ircdule is 
part of the ROOT phase, the external 
reference [DC V(B)] is resolved with the 
entry point within the ROOT phase (B 
CSECT) . When the irodule is net part of 
the ROOT phase, the external reference is 
resolved with the last previous occurrence 
of this entry point. Since the reference 
is given before the CSECT lakeled B is 
defined in that phase, it is resolved with 
the CSECT labeled B in the ROOT phase. 



PHASE PHNAME1,F+30K 
PHASE PHNAME2,* 
PHASE PHNAME3,PHNAME2 



The first phase (PHNAMEl) of the preceding 
series is loaded starting at 30K plus the 
length of the save area and label area. 
The second phase (PHNAME2) of the series 
is loaded at the end of PHNAMEl. The 
third phase (PHNAME3) is loaded at the 
same address as was PHNAME2, that is, at 
the end of PHNAMEl. 



Note: In each of the preceding examples, 
if the origin address supplied is not on a 
doubleword boundary, the linkage editor 
automatically increments to the next 
doubleword boundary. 



The linkage editor allows the inclusion 
of the same control section within each of 
several phases. If a control section 
(CSECT) appears in a ROOT phase, it does 
not appear in any other phase. (This does 
not apply to control sections that begin 
with the letters IBM.) A duplicate 
control section within the same phase will 
be ignored. 




V(B) 



Whereas the coding 
A START 
E CSECT 
A CSECT 

DC V(B) 



As external references occur in a 
phase, they are resolved preferentially 
with the entry point within the ROOT phase 
(if any) , or the last previous occurrence 
of this entry point. For example, the 
coding 



START 



DC V(B) 



CSECT 



END 



E CSECT 



END 



when used as a module in two phases has 
the same result. When the module is part 
of the ROOT phase, the external reference 
(DC V(B)] is resolved with the entry point 
within the ROOT phase (B CSECT). When the 
module is not part of the ROOT phase, the 
external reference is resclved with the 
last previous occurrence of this entry 
point. Since the CSECT labeled E is 
defined in this phase before the reference 
is given, the external reference is 
resolved in the same phase. No problem 
arises freir defining duplicate CSECTs in 
the same phase, since these are ignored. 
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A I 



| V-(B) 



I 

I V(B) 



) 



This method of coding redefines the 
sequence of ESD information to allow valid 
cross reference by the linkage editor. 
This is also true in AUTOLINK mode, except 
for the case of privileged external 
references (external references whose 
labels begin with the letters IJ) . For 
those references, if the resolution is not 
possible within the current phase or ROOT 
phase, then the AUTOLINK function is 
performed on this external reference at 
the end of the phase, and the other 
previously defined phases are not examined 
for possible resolution. If NCAUTC is 
specified, the IJ prefix is not 
privileged. 

INCLUDE STATEMENT 

INCLUDE indicates that an object module is 
to be included for editing by the linkage 
editor. It has two optional operands. 
When both operands are used, they rrust be 
in the prescribed order, when the first 
operand is omitted and the second operand 
is used„ a comma must precede the second 
operand. The first operand indicates that 
the input is in the relocatable library. 
The second operand indicates that the 
input is in submodular structure. The 
names appearing in the namelist (second 
operand) are the names of selected control 
sections from which a phase is to be 
constructed. 

If both operands are omitted, the 
object module to be included is assumed to 
be on SYSIPT. Job control copies it onto 
SYSLNK. Each series of relocatable 
modules on SYSIPT must be terminated by a 
/* control statement. INCLUDE statements 
with blank operands are recognized only on 
SYSRDR. 

If only the first operand is present, 
the object module is assumed to be in 
either the private or the system 
relocatable library. The linkage editor 
first searches the private relocatable 
library (if assigned) and then the system 
relocatable library for the module. The 



ircdule narre must be the same as that used 
when the module was cataloged in the 
library. Including modules frcm the 
relocatable libraries permits the 
prcgrairmer to include standard subroutines 
in his program at link-edit time. 

If only the second operand is present, 
the object module to be included is 
assuired to be in the input stream 
(SYSLNK). The linkage editor reads the 
cbject module and extracts the control 
section (s) indicated by the second operand 
of the INCLUDE. 

Note: If this option is elected, the 
module must be preceded by an INCLUDE 
statement with a blank operand in order 
for job control to place the module on 
SYSLNK. 

If both operands are present, the 
object module is read from the relocatable 
library and the indicated control 
section (s) are extracted. 

The placement of the INCLUDE statement 
determines the position cf the module in 
the program phase. An included module (in 
the relocatable library) can be preceded 
by cne or mere additional INCLUDE 
statements. 

The format of the INCLUDE statement is: 

INCLUDE [modulenamel [, (nairelist)] 

| At least one blank must precede INCLUDE. 

ircdulename 

Symbolic name of the module, as 
used when cataloged in the 
relocatable library. It consists 
cf one to eight alphameric 
characters. 

(namelist) 

The linkage editor constructs a 
phase from only the control 
sections specified. The namelist 
is in the following format. 

(csnamel,csname2, . . .) 

Entries within the paren- 
theses are the names cf the 
control sections that will be 
used to constitute a phase. When 
the namelist option is used and 
only selected control sections 
are included in a phase, a 
submodula r phase is created. The 
counterpart of a submodular phase 
is a normal phase. A normal 
phase contains all control 
sections of one or more object 
modules. It is possible to 
include within the same phase an 
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object module (s) without the 
namelist option and an object 
module (s) specifying the namelist 
option. The total number of 
control sections in a nairelist 
cannot exceed five; however, any 
number of INCLUDE statements can 
be used. 

Modules in the relocatable library can be 
nested by using INCLUDE statements up to a 
depth of five (level of six) . Modules 
included by INCLUDE statements read from 
SYSRDR are referred to as being in the 
first level. Modules included by 
statements in the first level are at the 
second level. Modules included by 
statements in the second level are at the 
third level, and so on up to six levels. 

Submodular Structure 

When several control sections are compiled 
together in one object module, it is 
sometimes desirable to break them up into 
several phases at link-edit time. This is 
done by using a PHASE statement followed 
by an INCLUDE statement with the namelist 
option. For example, in the sequence 

PHASE PHNAME1,* 

INCLUDE , (CSECT1,CSECT3) 

PHASE PHNAME2,* 

INCLUDE , (CSECT2,CSECT5) 

PHASE PHNAME3,PHNAME2 

INCLUDE , (CSECT4,CSECT6) 

the linkage editor structures the next 
module composed of CSECT1-CSECT6 in three 
overlays as shown: 



PHNAME1 



CSECT1 



CSECT3 



PHNAME2 



CSECT2 



CSECT5 



PHNAME3 



CSECT4 



CSECT6 



The absence of the first operand in the 
INCLUDE statement indicates that the 
control sections are to be incorporated 
from the next succeeding module in the 
input stream. 

The preceding sequence of PHASE and 
INCLUDE statements may be read by job 
control onto SYSLNK in one of two ways: 



If the PHASE and INCLUDE statements are 
en SYSRDR, an INCLUDE statement with a 
blank operand must follo w the sequence 
to read the module (on SYSIPT) 
containing CSECT1-CSECT6 onto SYSLNK. 



• If the PHASE and INCLUDE statements are 
en SYSIPT (immediately preceding the 
module) , an INCLUDE statement with a 
blank operand on SYSRDR directs job 
ccntrcl tc read everything onto SYSLNK 
from SYSIPT down to the /* statement. 

PHASE and INCLUDE statements can also be 
in the relocatable library. This implies 
that submcdular phases can be constructed 
from modules in the relocatable library. 
If PHASE and INCLUDE statements come from 
the relocatable library (via an INCLUDE 
MODNAME) , then the control sections for 
that module are in the relocatable 
library. In this structure, the required 
control sections (in the relocatable 
library) iirmediately fcllcw the last 
INCLUDE statement. For example, in the 
sequence 

PHASE PHNAME1,* 

INCLUDE MCDNAME1, (CSECT1 , CSECT3) 

PHASE PHNAME2,* 

INCLUDE MCDNAME1, (CSECT2, CSECT5) 

PHASE PHNAME3,PHNAME2 

INCLUDE MCDNAME1, (CSECT4 ,CSECT6) 

the linkage editor structures the next 
module (cataloged in the relocatable 
library under M0DNAME1) composed of 
CSECT1-CSECT6 into the same three overlays 
as shown in the preceding example. 

If M0DNAME1 contains an INCLUDE 
statement, the linkage editor interprets 
this tc mean that the module tc he 
included should also be searched for the 
control sections requested in the 
namelist. For example, in the relocatable 
library if M0DNAME1 contains 

INCLUDE MODNAME 2 

CSECT3 

CSECT5 

CSECT6 

and in the relocatable library MCDNAME2 
contains 

CSECT1 
CSECT2 
CSECT4 

upon encountering an 

INCLUDE MCDNAME1, (CSECT1 ,CSECT3 ) 

statement, the linkage editor goes to 
M0DNAME1 and finds INCLUDE MCDNAME2 . The 
linkage editor then goes to M0DNAME2 and 



( 
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extracts CSECT1 and returns to M0DNAME1 
and extracts CSECT3. 



A nonsubmodular INCLUDE statement may 
be placed before or after a submodular 
INCLUDE statement. This results in the 
addition of the included module into the 
phase at the point the INCLUDE statement 
is encountered. For example, if MODI 
contains CSECT4 and CSECT5, the sequence 



PHASE PHNAMEl,* 
INCLUDE , (CSECTl f CSECT3) 
INCLUDE MODI 

(Object module containing CSECT1 and 
CSECT3) 

results in the following structure: 

PHNAME1 CSECT1 
CSECT3 
CSECT4 
CSECT5 

while the sequence 

PHASE PHNAMEl,* 

INCLUDE MODI 

INCLUDE , (CSECTl, CSECT3) 

(Object module containing CSECT1 and 
CSECT3) 



results in the following structure: 



ENTRY STATEMENT 

Every program, as input fcr the linkage 
editor, is terminated by an ENTRY 
statement. Its format is: 



ENTRY 



[entrypoint] 



I At least one blank must precede ENTRY. 



entrypoint 



Symbolic name of an entry 
point. It must be the name 
of a CSECT or a label 
definition (source ENTRY) 
defined in the first phase. 
This address is used as the 
transfer address to the first 
phase in the program. If the 
operand field is blank, the 
linkage editor uses as a 
transfer address the first 
significant address provided 
in an END record encountered 
during the generation of the 
first phase. If no such 
operand is fcund en the END 
card, the transfer address is 
the lead address cf the first 
phase. 



It is necessary to supply the ENTRY 
statement enly if a specific entry point 
is desired. Job control writes an ENTRY 
statement with a blank operand en SYSLNK 
when EXEC LNKEDT is read to ensure that an 
ENTRY statement will be present to halt 
link editing. 



J 



PHNAMEl CSECT4 
CSECT5 
CSECT1 
CSECT3 

Note: Both of the following statements 
produce the same result. 

INCLUDE , (CSECT1,CSECT3) 
INCLUDE , (CSECT3,CSECT1) 

That is, CSECT1 and CSECT3 are in storage 
in that sequence. This is because the 
linkage editor extracts control sections 
in the order in which they appear in the 
input stream, not as they are ordered in 
the namelist. In order to have CSECT3 
physically located ahead of CSECTl in 
storage, two INCLUDES must be used: 



INCLUDE 
INCLUDE 



, (CSECT3) 
, (CSECTl) 



As no diagnostic is given if a control 
section, specified in the namelist, is not 
present in the indicated module, ycu can 
inspect the MAP supplied by the linkage 
editor to determine if the proper control 
sections are in the correct phases. 



ACTION STATEMENT 

This statement is used tc indicate linkage 
editor options. When used, the statement 
must be the first linkage editor record(s) 
in the input stream. If multiple operands 
are required, they can be placed in 
separate ACTION statements or in one 
ACTION statement separated by commas. Its 
format is: 



ACTION 



REL ][, CLEAR] 
NCREL) 
[ , CANCEL 



1 tE] 



f",MAP "I [,NOAUTO] 
|_,NOMApJ 



I At least one blank must precede ACTION. 

CLEAR Indicates that the unused portion 
cf the core image library will be 
set to binary zero before the 
beginning cf the linkage editor 
function. CLEAR is a time- 
censuming function. It should be 
used only if it is necessary to 
fill areas defined by ES 
statements with zeros. 
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MAP 



NOMAP 



NOAUTO 



CANCEL 



BG 
Fl 
F2 
F3 
F4 



Indicates that SYSLST is available 
for diagnostic messages. In 
addition, a map of virtual storage 
is printed on SYSLST. The map 
contains the name of every entry 
within each CSECT and the name of 
every CSECT within each phase. 

Indicates that SYSLST is not 
available when performing the 
link-edit function. Storage 
mapping is not performed and all 
linkage editor error diagnostics 
are listed on SYSLCG. 

Indicates the AUTOLlNK function is 
to be suppressed during the link 
editing of the entire program. 
AUTOLINK will be suppressed for 
both the private and the system 
relocatable libraries. 

Note: When a WX is encountered, 
it is treated in the same manner 
as an EXTRN, NOAUTO. 

Cancels the job automatically if 
any of the errors 21001 through 
21701 occur. If this cpticn is 
not specified, the job continues. 

Sets the end-of-supervisor 
address used in linkage editor 
calculations to the beginning of 
the virtual partition specified, 
plus the length of the label area 
and of the save area. The 
end-of-supervisor address in the 
communication regicn is net 
changed. 

The BG, Fl, F2, F3, and F4 
operands link edit a program to 
execute in a partition ether than 
that in which the link edit 
function is taking place. 
Programs that have a phase origin 
of S (or * for the first phase of 
a program) are originated to the 
specified virtual partition. 

Use of the ACTION BG statement is 
possible only in a system 
supporting more than one partition 
and the private core image library 
option when the linkage editor is 
executing in a foreground 
partition. 

Use of the ACTION Fn statement in 
a multiprogramming environment 
requires that the partition be 
allocated. If these operands are 
used in a non-multiprogramming 
environment, they are ignored. If 
none of these operands are 
present, the program is link 
edited to execute in the virtual 



partition or in its associated 
real partition in which 
link-editing takes place, unless 
otherwise specified in the PHASE 
statement. 

REL Indicates that the phase (s) 

produced during this execution of 
the linkage editor is (are) to be 
made relocatable, if possible. 
The format of the origin specified 
in the PHASE statement determines 
whether or not a relocatable phase 
car be produced. (Refer to the 
origin operand in the PHASE 
statement.) If support for the 
relocating loader was generated in 
the supervisor, ACTION REL is the 
default. At program execution 
time, a relocatable program can be 
leaded into any partition. For a 
more detailed description of the 
relocating leader and its use, 
refer to the DQS/VS System 
Management Guide , GC33-5371. 

NOREL Indicates that the phase (s) 

produced during this execution of 
the linkage editor is (are) not to 
be made relocatable. If support 
for the relocating leader was not 
generated in the supervisor, 
ACTION NOREL is the default. 

An ACTION statement flagged as invalid (as 
the result of an invalid operand, etc.), 
ignores all subsequent ACTION statements 
submitted during the job. 

The ACTION statement is net required. 
If the MAP option is specified, SYSLST 
must be assigned. If the statement is net 
used and SYSLST is assigned, MAP is 
assumed and a map of virtual storage and 
any error diagnostics are printed on 
SYSLST. If the statement is net used and 
SYSLST is not assigned, NOMAP is assumed. 

The following information is contained in 
the storage map. 

1. The name of each phase, the lowest and 
highest virtual storage locations of 
each phase, and the hexadecimal disk 
address where the phase begins in the 
cere image library. 

2. An indication if the phase is a ROOT 
phase, or if a phase overlays the ROOT 
phase in any way (designated by 
OVERCCT) . 

3. The length of COMMON, if appropriate. 

4. The names of all CSECTs belonging to a 
phase, the address where each CSECT is 
loaded, and the relocation factor of 
each CSECT. 
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5. All defined entry points within a 
CSECT. if an entry point is 
unreferenced, it is flagged with an 
asterisk (*). 

6. The names of all external references 
that are unresolved. 

7. The transfer (execute) address of each 
phase. 

8. An indication that the phase is 
relocatable, self-relocating, not 
relocatable, or SVA eligible. 

9. Warning messages are printed if: 



• The ROOT phase has been overlaid; 

• A possible invalid entry pcint 
duplication occurred; 

• The ENTRY or END statement 
contained an invalid (undefined) 
transfer label; 

• At least one control section had a 
length of zero; 

• The assembled origin en an RLD 
statement was outside the limits of 
the phase; 

• An address constant cculd net be 
resolved. 

These messages may or may not indicate 
actual programming errors. If NOMAP is 
operational, the warning messages are not 
printed. 



The difference between specifying 
NOAUTO in a PHASE statement and specifying 
ACTION NOAUTO. The NOAUTO operand in a 
PHASE statement indicates to the Linkage 
Editor that AUTOLINK is to be suppressed 
fcr that phase only. If an entire program 
requires NOAUTO, then specifying ACTION 
NOAUTO cancels AUTOLINK during link 
editing of the entire program, thereby 
eliminating the necessity cf specifying 
NOAUTO in each PHASE statement. 



Figure 27 shows a storage map and a 
diagnostic listing produced en SYSLST. 



For the line numbers referred tc in the 
following discussion, see Part 1 of Figure 
27. 



1. Line 1 (ACTION TAKEN). KAP and REL 

have been specified en separate ACTION 
cards. Had NOAUTO been specified, it 
would also appear on this line. 



2. Lines 3, 13, 15, 17, 19, 21, 23, 25, 
and 27. These lines are printed when 
the statement is read ty the linkage 
editor. 

When a module is included frcm the 
relocatable library, it is net possible to 
guarantee that the sequence identification 
printed in columns 8-15 is that cf the 
record printed. This occurs because the 
KAINT librarian program reblccks the 
content of the cards to a more compressed 
format. 



) 
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JOE NO NAME 31/07/73 DOS LINKAGE EDITOR DIAGNOSTIC OF INPUT 

1 ACTION TAKEN MAP REL 

2 LIST INCLUDE IJBSL2 LNK00020 

3 LIST INCLUDE IJBMIN INITIALIZATION 03 0000 00 

4 LIST PHASE MAINT, +0, NOAUTO 

5 LIST INCLUDE IJJCPDIN LIOCS I/O MODULE 

6 LIST INCLUDE IJBMUP DISK ADDRESS UPDATE ROUTINE 

7 LIST INCLUDE IJBMIO DISK I/O ROUTINE 

8 LIST INCLUDE IJBMCS CARD SCAN ROUTINE 

9 LIST INCLUDE IJBLBC LIBRARIAN ERROR ROUTINE 

10 LIST INCLUDE IJBLBA MAI NT FETCH ROUTINE 

11 LIST INCLUDE IJBMDU DIRECTORY UPDATE ROUTINE 

12 LIST INCLUDE IJBMDS DIRECTORY SCAN ROUTINE 

13 LIST INCLUDE IJBLBE MAINTR2 06 000000 

14 LIST PHASE MAINTR2, MAINTSUB ,NCAUTO 

15 LIST INCLUDE IJBLED MAINTER 09000000 

16 LIST PHASE MAINTDR, MAINTSUB, NCAUTC 

17 LIST INCLUDE IJBLEF MAINTS2 12000000 

18 LIST PHASE MAINTS2, MAINTSUB , NCAUTC 

19 LIST INCLUDE IJBLBN MAINTP2 PM 15000000 

20 LIST PHASE MAINTP2, MAINTSUB , NCAUTC 

21 LIST INCLUDE IJBLEL MAINTA 18000000 

22 LIST PHASE MAINTA, MAINTSUB, NCAUTC 

23 LIST INCLUDE IJBLEM MAINTCL 21000000 

24 LIST PHASE MAINTCL, MAINTSUB , NCAUTC 

25 LIST INCLUDE IJBLBG MAINTCN 27000000 

26 LIST PHASE MAINTCN, MAINTSUB , NCAUTC 

27 LIST INCLUDE IJBLBQ MAINTUP 33000000 

28 LIST PHASE MAINTUP, MAINTSUB , NCAUTC 

29 LIST ENTRY 

Figure 27. Storage Map (Part 1 of 3) 
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1/07/73 



PHASE 



MAINT 



XFR-AD LOCORE HICCRE DSK-AD 


ESB TYPE 


LAEEL 


LOADED 


REL-FR 


00099A 000000 0015D7 029 13 


01 CSECT 


IJJCPDIN 


000000 


COOCOC 




ENTRY 


IJJCPD3 


000000 






CSECT 


IJENUPUO 


000298 


000298 




ENTRY 


DKAEUP 


000298 






ENTRY 


VIJEMUP 


000300 






CSECT 


IJEtfI040 


000308 


C00308 




ENTRY 


RDENT 


000308 






ENTRY 


WTFMENT 


000314 






ENTRY 


WTDATENT 


000358 






ENTRY 


IOSTART 


000308 






ENTRY 


VIJEMIO 


000418 






CSECT 


IJEWCS50 


000448 


000448 




ENTRY 


CSSTART 


000448 






ENTRY 


CSCCNT 


0004F2 






ENTRY 


NEWREAD 


000464 






ENTRY 


IJSYSIN 


000668 






ENTRY 


ENDJOB 


000582 






ENTRY 


INPUT 


000724 






ENTRY 


EOF 


000560 






ENTRY 


P2ECF 


000564 






ENTRY 


SETCF 


00057C 






ENTRY 


INFUT1 


000722 






* ENTRY 


COMKBYTE 


00080F 






ENTRY 


VIJEMCS 


000814 






ENTRY 


STATTAB 


0006E2 






CSECT 


IJEERR40 


000828 


00828 




ENTRY 


ERSTART 


000828 






ENTRY 


AREA 


000875 






ENTRY 


IJSYSLS 


0008F8 






* ENTRY 


ASA 


000873 






ENTRY 


SKIPMV 


00083A 






ENTRY 


COUNT 


000872 






ENTRY 


VIJELBC 


00O8F0 






CSECT 


IJEMNT41 


000990 


000990 




ENTRY 


INITABLE 


00OED4 






* ENTRY 


EEGINN 


00099A 






ENTRY 


BEGINN1 


00099C 






ENTRY 


PCILEXT 


00OEFE 






ENTRY 


PRELEXT 


00OCO1 






ENTRY 


PSSLEXT 


000C05 






ENTRY 


MNTLP 


000ECC 






ENTRY 


MNTRETN 


0009FO 






CSECT 


IJEMDU5 


O0OD8O 


000E80 




ENTRY 


VIJEMDU 


000F40 






ENTRY 


TRACKS 


000E63 






ENTRY 


SSRECD 


000F3B 






ENTRY 


RLRECD 


000F3C 






ENTRY 


PLRECD 


000F3A 





Figure 27. Storage Map (Part 2 of 3) 
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PHASE 



XFR-AD LOCORE HICORE DSK-AD 



ESD TYPE LAEEL 



LCADEE REL-FR 



MAINTR2 
MAINTDR 



MAI NTS 2 
MAINTP2 

MAINTA 
MAINTCL 
MAINTCN 
MAINTUP 



001022 001018 



001022 001018 



001022 001018 
001022 001018 
001022 001018 











ENTRY 


DUSTART 


000D80 












ENTRY 


DUCLD 


000ED6 












CSECT 


IJEMDS40 


000F58 


000F5 










ENTRY 


VIJEMDS 


001004 












ENTRY 


MAINTSUB 


001018 












ENTRY 


DSSTART 


000F58 












ENTRY 


DSCCNT 


000FD0 












ENTRY 


READNXT 


00OF64 












CSECT 


IJENIN50 


001018 


00101 










ENTRY 


VIJEMIN 


0013C0 












ENTRY 


IN START 


001018 




00208F 


02A 


00 


01 


CSECT 


IJEWAR4 


001018 


C0101 


001F07 


02A 


00 


06 


CSECT 

ENTRY 
* ENTRY 


IJEMDR4 

MAINDIR 

DRSTART 


001018 
001260 
001022 


00101 


0021FA 


02A 


01 


04 


CSECT 

* ENTRY 


BEGIN 
CATENT 


001018 
001022 


00101 


00193C 


02A 


02 


03 


CSECT 

ENTRY 
* ENTRY 


BEGIN 
NCECF 
CATALP 


001018 
001442 
001022 


00101 


002FD7 


02A 


02 


06 


CSECT 


IJEWAA41 


001018 


00101 


001584 


02A 


04 


02 


CSECT 


IJEMCL4 


001018 


00101 


002817 


02A 


04 


04 


CSECT 


IJECON50 


001018 


C0101 


002CE7 


02A 


05 


04 


CSECT 


IJEUPD5 


001018 


C01C1 










CSECT 


BCCK 


0029B0 


00101 



NOT RELOCATABLE 
NOT RELOCATABLE 



8 NOT RELOCATABLE 

8 NOT RELOCATABLE 

8 NOT RELOCATABLE 

8 NCT RELOCATABLE 

8 NOT RELOCATABLE 

8 NOT RELOCATABLE 



Figure 27. Storage Map (Part 3 of 3) 
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LINKAGE EDITOR INPUT CONSIDERATIONS 



LINKAGE EDITOR JOB SETUP 



) 



The storage requirements for a link-edit 
run depend on: 



Input to the linkage editor (nuirber of 
PHASE statements and number of ESD 
items) . 



• Whether $MAINDIR (the phase that is 
called by the linkage editor and 
librarian programs to maintain the core 
image directory) runs in the SVA or net. 

Note; It is assumed that $LIBSTAT (the 
phase that prints out the status report 
of the libraries) runs in the SVA if 
$MAINDIR does. 

• The start address of the linkage editor 
during execution. (The work area for 
the linkage editor starts on a IK 
boundary, while the linkage table starts 
on a page boundary. In the following 
storage estimate formula, the worst case 
is assumed, that is, the maximum storage 
amount of 2K is used to ensure correct 
alignment.) 

In a virtual partition of 64K with $MAINDIR 
running in the SVA the linkage editor can 
process at least 50 phases with a total 
number of 1700 unique ESD items. 

A unique ESD item is defined as being an 
occurrence in the control dictionary. All 
symbols that appear in the MAP are unique 
occurrences. A symbol that occurs several 
times in the input stream is normally 
incorporated into a unique ESD item. 
However, if the same symbol occurs in 
different phases (for example, control 
sections),, each resolved occurrence of the 
symbol within a different phase is a unique 
ESD item. 

You can use the following formula fcr 
storage estimates. If the relation is 
satisfied, then you have enough address 
space for the link-edit run. 

26,900 + M + ST + 52 * x + 20 * y < P 

where M = if $MAINDIR runs in SVA 
10,240 if $MAINDIR runs in 
partition 

ST = 30 * x if 30 * x < 2048 
2048 if 30 * x > 2C48 

x = number of PHASE statements 

y = total number of unique ESD items 

P = available storage in partition. 



When link editing in the 
private core image libra 
uniquely assigned to the 
program phase (output of 
editcr) is put in the pr 
library. In the backgro 
editcr can put a phase i 
or the system core image 
SYSCLB is uniquely assig 
background, the linkage 
put in the private cere 
SYSCLB is not assigned, 
image library is used. 



foreground, a 
ry (SYSCLB) must be 

partition . The 

the linkage 
ivate cere image 
und, the linkage 
n either a private 

library. If 
ned in the 
editcr output is 
image library. If 
the system core 



When performing a link-edit function, 
the following system and programmer logical 
units are used. SYSRDR and SYSIFT may 
contain input for the linkage editor. This 
input is written cntc SYSLNK by jcb 
control. 



Unit Fun ction 

SYSRDR Control statement input (via Job 

Control) 

SYSIPT Module input 

SYSLST Programmer messages and listings 

SYSLOG Operator messages 

SYSLNK Input to the Linkage Editor 

SYS001 Wcrkfile 



In normal operations, all preceding logical 
units must be assigned. In a unique 
circumstance (when all modules tc be 
link-edited are in the relocatable 
library), SYSIPT would net need to be 
assigned. 

If cutput from the linkage editcr is to 
be placed in a private cere image library, 
the following symbolic unit is alsc 
required: 

SYSCLB The private core image library 

A link-edit job is set up in the following 
manner. 



Ccntrcl 
Statement 

// JOB 



// ASSGN 



Remarks 

Required enly if this is the 
first job step of a job. 

Required only if device 
assignments are tc differ 
from the system standard 
assignments. Units that can 
be assigned are SYSRDR, 
SYSIPT, SYSLST, SYSLNK, and 
SYS001. 
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ASSGN SYSCLB 



// OPTION 



ACTION 



PHASE 
INCLUDE 



Required if output cf 
linkage editor is to be 
placed in a private core 
^itiage library. 

OPTION statement must follow 
the ASSGN statement (if any) 
for SYSLNK. 

Optional ACTION statement 
(with appropriate operands) 
must precede the first 
linkage editor control 
statement. 

As many PHASE and 
INCLUDE statements as are 
required are used to 
construct phases frcm the 
modules input to the linkage 
editor. 

Optional statement to 
provide a transfer address 
for the first phase. 

LBLTYP statement (if 
required) to define the 
amount of storage tc be 
reserved at link-edit time 
for processing of tape cr 
nonsequential DASD file 
labels in the virtual 
storage partition. 



// EXEC LNKEDT EXEC statement to call the 

linkage editor from the core 
image library. Job control 
creates an ENTRY statement 
on SYSLNK to ensure its 
presence to halt link 
editing. 



ENTRY 



// LBLTYP 



/£ 



End-of-job statement. 



When link-editing multiple object modules 
into one program phase, make sure that the 
linkage editor selects the intended entry 
point. Either specify or place the main 
control section first in the linkage editor 
input, or use a linkage editor ENTRY 
statement with the name of the main control 
section as the entry-point operand. 



EXAMPLE OF LINKAGE EDITOR INPUT AND OUTPUT 



The program shown in Figure 28 illustrates 
the rules governing input for the linkage 
editor and shows the output obtained. 
Though this example is somewhat more 
complex than the normal program, by 
following the flow of the input, one can 
find practically every situation that may 
arise. 



The leftmost block shews control 
statements being read by job control from 
SYSRDR. The next blcck is read by job 
control from SYSIPT and contains an object 
ircdule (module 1) and a source module to be 
assembled. The next block shows the output 
from jcb ccntrol on SYSLNK, which is the 
input to the linkage editor. The next two 
blocks represent two levels in the 
relocatable library. The rightmost block 
shews the output phases as they appear in 
the temporary portion of the core image 
library after the execution cf the linkage 
editor function. A detailed sequence of 
events fellows. 



Linkage editor control statements are 
read by jet control frcm SYSRDR and are 
copied on SYSLNK until an INCLUDE statement 
with a blank first operand is read. This 
statement is not copied on SYSLNK. 
Instead, jcb control copies the module on 
SYSIPT onto SYSLNK until a /* statement is 
read. Jcb control then reads frcm SYSRDR. 
An assembly is executed and its output is 
written directly on SYSLNK. (It is assumed 
that LINK was specified in an OPTION 
statement preceding the linkage editor 
control statements.) Job control then 
writes the ENTRY statement with a transfer 
label for CS A on SYSLNK and issues a fetch 
fcr the linkage editor. 



The linkage editor reads frcm SYSLNK and 
starts to create a program. An INCLUDE 
statement with a first operand signals the 
linkage editor to access the relccatable 
library. This is the first level of an 
INCLUDE. In the first level cf the 
relocatable library, the linkage editor 
reads an INCLUDE (for the second level) and 
performs this inclusion. As no INCLUDE is 
present in the second level, ccntrol is 
returned to the calling input level. This 
process is repeated fcr the next INCLUDE. 
Note that the namelist specifies only CS C 
is wanted. 



After the inclusion of the module at the 
first level, ccntrol is returned tc SYSLNK 
where a new phase is encountered. The 
ccntrol sections are read frcm SYSLNK and 
added to FHASE2 until the next INCLUDE is 
read. At this time, the linkage editor 
again accesses the relccatable library, 
performs the inclusion of MOC5 into PHASE2, 
and continues reading input from SYSLNK. 
Processing continues until the ENTRY 
statement is reached. 



The split control section (CS E) is 
assigned a contiguous area of virtual 
storage. 



( 
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SYSRDR 










SYSIPT 




SYSLNK 












— Core Image Library — 
PHASE 1 






PHASE PHASE 1-^ 


/ 


[4 


ESD module 1 yt 




PHASE PHASE 1 


1 

Level 1 




Level 2 




INCLUDE M0D2 

I 


TXTCSE y_ 


INCLUDE MOD2 


► 


INCLUDE MOD3 




ESD module 3 




CSA 




4 1 






PHASE PHASE2/ 


TXT CS F / 


PHASE PHASE2 




INCLUDE MOD4 






TXT CS A 


CSB 












INCLUDE / 


TXT CS E (contl,. 


ESD module 1 


ESD module 2^~ 


TXT CS B 


CSC 


„ 












EXEC ASSEMBLY^ 






RLD module 1 , 


TXT CS E 


TXT CS D 


RLD module 3 


CSD 


«-| 




ENTRY label CS A 


\ 


\ 


END module 1 

V 


TXT CS F 


RLD module 2 


END module 3 


PHASE 2 


EXEC LNKEDT 


INCLUDE MOD5^ 


TXT CS E (cont) 


4? 

r — 


END module 2 


1 ► 


INCLUDE (C) 


CSE 

CS E (cont) 






/* 


RLD module 1 


ESD module 5 






ESD module 4 




^ 


Assembler 
Source Deck 
(CSH) 


END module 1 


TXTCSG^ 




TXT CS C 


CSF 






INCLUDE MOD5 


^1 


RLD module 5 


TXT CS C1 


CSG 




/* 


ESD Assembler 




- 


END module 5 


RLD module 4 


CSH 












TXT CS H 








END module 4 










RLD Assembler 






END Assembler 




ENTRY label CS A 




3d by Job Conl 








Read by Linkage Editor 

















Figure 28. Example of Linkage Editor Input and Output 
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LIBRARIAN 



This section describes the set cf programs 
that maintain, service, and copy the 
libraries of DOS/VS. This set cf programs 
is collectively referred to as the 
librarian. 



The system residence (SYSRES) can 
contain four separate and distinct system 
libraries: 



1. Core image library 



2. Relocatable library 

3. Source statement library 

4. Procedure library. 

The core image library is the only library 
that is required. 

Figure 29 lists the logical units 
required and used by the librarian 
programs. 



r T T T T T T T 

MAINT | CORGZ I DSERV I CSERV I RSERV I SSERV I PSERV I ESERV 



SYSRDR 3 



SYSIPT 



SYSLST 



SYSLOG ; 



SYSRES 



SYSCLE 



SYSRLB 



SYSSLB 



SYS000 



SYS001 



SYS002 



+ -• 



SYS003 



SYSIN3 



SYSPCH 

L i 



) 



R = Required 

= Optional dependent upon function specified 

I '-SYSRDR is required for job contrcl purposes crly. 
2 SYSLOG must not be assigned to a printer 
3 If SYSRDR and SYSIPT are assigned to the same device, SYSIN may be used. 

Figure 29. Logical Units Required and Used by the Librarian Programs 
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DISK STORAGE SPACE REQUIRED F OR LIB RARIES 
AND DIRECTORIES 



You must determine the amount cf space 
allocated to each of the libraries and 
directories. Each library consists of one 
or more complete disk tracks. Each 
directory occupies the first track (s) cf 
the first cylinder allocated to its 
respective library. 



DIRECTORY SIZES 

Figure 3 summarizes the track requirements 
for the core image , relocatable, source 
statement, and procedure directories. 



CORE IMAGE LIBRARY SIZE 

Each track allocated to the core image 
library contains three fixed-length blccks 
on 2311, six fixed-length blccks on 



NUMBER OF ENTRIES: 
2311* 

I first track 
other tracks 
last track 

I first track 
other tracks 
last track 



3340 



[first track 
other tracks 
last track 



NUMBER OF TRACKS: 



2311* 



2314/2319 



3330/3333 



3340 



Directory 



Core Image j Relocatable 
4 



•T T" 

| Source Statement! 
.4 4- 



Prccedure 



Variable 
(see Note) 



Variable 
(see Note) 



335 j module 
340 \ entries 
339 



555 
560 
559, 



module 
entries 



335 J module 
340 J entries 
339 



TRD 


= 


m+6 
340 


TRD 


= 


m+6 
560 


TRD 


= 


m+6 
340 



265 
270 
269J 



book 
entries 



435] book 

440) entries 
439) 

255 ) book 

260} entries 
259 



TSD 


— 


b+6 
270 


TSD 


= 


b + 6 
440 


TSD 


= 


b+6 
260 



265 
27C 
269. 



procedure 
entries 



435) procedure 
440 J entries 
439) 

255 ] procedure 
260 j entries 
259) 



TPE = 



TPE = 



TPE = 



d+6 
270 

d+6 
440 

d+6 
260 



m = Total number of modules in the relocatable library, 
b = Total number of books in the source statement library, 
d = Total number of procedures in the procedure library. 

The value TxD is rounded to the next higher integer if a remainder results. 

♦The 2311 is supported as a private core image library only. 

Note; The entries in the core image directory are of variable length with a maximum 

length of 30 bytes. The length cf the entries is determined by the information 
contained in them. The load point at link-edit time, the entry point at 
link-edit time, the number of RLD items,, the number of additional RLD blocks, 
and the partition start address at link-edit time are only part cf the directory 
entry under certain conditions. The number of blocks (256 bytes) per track is 
10 for the 2311 (only private core image library), 17 for the 2314/2318, 28 for 
the 3330/3333, and 16 for the 3340. 

L 

Figure 30. Calculation of the Tracks Required for Directories 
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Page of GC33-5376-1, revised November 30, 1973, by TNL GN33-8767 



2314/2319, eleven fixed-1 
3330/3333, or seven fixed 
3340. Each block contain 
instructions or data. Fo 
phases, the core image li 
exactly the same informat 
into virtual storage for 
relocatable phases, the c 
TXT and RLD information, 
written beginning in a ne 
number of tracks required 
image library can be calc 



ength blocks en 
-length blocks on 
s 1024 bytes of 
r non-relocatable 
brary contains 
ion as is loaded 
execution. Fcr 
IL contains both 

Each phase is 
w block. The 

for the cere 
ulated as follows 



TCL = 


Bt 
n 


where 


n 



> 



1. Determine the number of blocks (B) 
required for a phase: 

B = _L 

1024 

where L is the total number of bytes in 
the phase (rounded up to a multiple of 
4) plus 4 times the nuirber of RLD items 
(see the assembly listing) . The value 
B is rounded to the next higher integer 
if a remainder results. 

2. Determine the total number of blocks 
(Bt) required for all phases in the 
core image library: 

Bt = Bl + B2 + B3 + + Bn 

3. Determine the number of tracks (TCL) 
required to hold all phases in the core 
image library: 



: 3 for the 2311 (supported as 
a private core image 
library only) 

6 for the 2314/2319 
11 for the 3330/3333 

7 for the 3340 



Determine the number of cylinders (CCL) 
required to hold the core 
image library and core 
image directory: 

CCL = TCD+TCL 
n 

where n = 10 for the 2311 (supported as 
a private core image 
library only) 
20 for the 2314/2319 
19 for the 3330/3333 
12 for the 3340 

The value of CCL is rounded to the next 
higher integer if a remainder results. 
This calculation is useful when 
executing MAINT and CORGZ. When 
allocating a SYSRES file, add two 
tracks for system purposes. 



RELOCATABLE LIBRARY SIZE 

Each track allocated tc the relocatable 
library contains 16 fixed-length blocks for 
the 2314/2319, 28 fixed-length blocks for 
the 3330/3333, or 17 fixed-length blocks 
for the 3340. Each blcck is 322 bytes 
long. A number of factors affects the 
packing of information in these tlccks. 
The factors include the following 
variables: 

1. The number of separate ccntrcl 
sections. 

2. The use of DS (define storage) 
statements, which reserve stcrage that 
may or may not be utilized for data 
constants defined in the program. 

3. Alternation of the lecation counter 
during assembly (use of CRG 
statements) . 

The following calculations approximate 
fairly accurately the library area required 
for typical programs. 



1. 



Determine the number cf tlccks (Be) 
required for all cards or statements 
except the actual prcgrair text. Assume 
a separate block for each card of the 
following types: 



a. PHASE 

b. INCLUDE 
C REP 



d. END 

e. SYM 

f. ENTRY 



2. 



3. 



4. 



5. 



Let Be equal the total number of cards 
cf the above types. 

Determine the number of blocks (Be) 
required for ESD and RLD cards. Assume 
a separate block for every two ESD or 
RLD cards. 

Determine the number cf blocks (Bi) 
required for the actual instructions or 
data in the TXT cards. Assuire an 
average of 200 bytes of text in each 
block. (A maximum per blcck, for 
continuously assigned text, is 264 
bytes per block.) Thus: 

B i = tctal_ bytes of text in TXT cards 

200 

Determine the total number of blocks 
(Bn) required for a module in the 
relocatable library: 

Bn = Be ♦ Bi + Be 

Determine the total number of blocks 
(Bt) required to held all cf the 
modules in the library: 



Bt 



El ♦ B2 + B3 +..,.+ Bn 
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Determine the number of tracks (TRL) 3. 

TRL = Bt 
n 

where n = 16 for the 2314/2319 
26 for the 3330/3333 
17 for the 3340 

The value TRL is rounded tc the next 

higher integer if a remainder results. 4. 

Determine the number of cylinders (CRD 
required to hold the relocatable 
library and directory: 

CRL = 



5. 



where n = 20 for the 2314/2319 
19 for the 3330/3333 
12 for the 3340 



The value CRL is rounded to the next 
higher integer if a remainder results. 



SOURCE STATEMENT LIBRARY SIZE 

Each track allocated to the source 
statement library contains 27 fixed-length 
blocks for the 2314/2319 or 44 fixed-length 6. 
blocks for the 3330/3333 or 26 fixed-length 
blocks for the 3340) . Each block contains 
a maximum of 160 bytes of source statement 
information. The source statements are 
compressed before they are written out on 
the source statement library. This 
compression is performed by eliminating all 
blanks in each source statement. Several 
count bytes indicating the number of blanks 
eliminated are added to each statement 
before writing it in the source statement 
library. The number of tracks required for 
the source statement library can be 
calculated as follows: 



Determine the number cf blocks (Bn) 
needed to hold the bock: 

Bn = N(Ls) 
160 

The value Bn is rcunded to the next 
higher integer if a remainder results 



Determine the total number of blocks 
(Bt) required to held all books in the 
library: 

Bt = El + B2 + B3 +....+ Bn 



Determine the number of tracks (TSL) 
required to hold all cf the books in 
the source statement library: 

TSL = Et 
n 

where n = 27 for the 2314/2319 
44 for the 3330/3333 
26 for the 3340 

The value TSL is rcunded tc the next 
higher integer if a remainder results. 



Determine the number cf cylinders (CSL) 
required to hold the source statement 
library and source statement directory: 

CSL = TSL+TSD 
n 

where n = 20 for the 2314/2319 
19 for the 3330/3333 
12 for the 3340 

The value CSL is rounded to the next 
higher integer if a remainder results. 



1. Determine the number of statements (N) 
used to define a book. If the book is 
an edited macro definition produced by 
the assembler, determine the number of 
statements in the source format 
definition. 



Determine the average compressed 
statement length (Ls) in the book. The 
compressed statement length 
approximately equals: 

Ls = (Ll+1) +....+ (Ln+1) + 3 

where each Ln is the number of bytes in 
each word of the source statement. For 
the macro sublibrary (sublibrary E) 
multiply the result by 1.2. 



PROCEDURE LIBRARY SIZE 



Each track allocated tc the procedure 
library contains 40 fixed-length blocks for 
the 2314/2319, 61 fixed-length blocks for 
the 3330/3333, or 34 fixed-length blocks 
for the 3340. Each block is 80 bytes long. 
A cataloged procedure consists cf one or 
more consecutive blocks, each containing a 
control statement or data, in uncompressed 
card-image format. The first five blocks 
cf the procedure library are save areas for 
currently uninterpreted overwrite 
statements (1 block/partition) that have 
already been read. The number of tracks 
required fcr the procedure library can be 
calculated as follows: 



I 
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1. Determine the number of blocks (B) for 
a procedure: 

E = N 

where N is the number of control 
statements and data cards in the 
procedure. 

2. Determine the total nurrber cf blocks 
(Bt) required to hold all the 
procedures in the library, and add 5 
for the save areas : 

Bt = Bl + E2 + B3 + En + 5 

3. Determine the number of tracks (TPL) 
required to hold all the procedure 
library: 

TPL = Bt 
n 

where n = 40 for the 2314/2319 
61 for the 3330/3333 
34 for the 3340 

The value of TPL is rounded tc the next 
higher integer if a remainder results. 

4. Determine the number of cylinders (CPL) 
required to hold the procedure library 
and procedure directory: 

CPL = TPD+TPL 
n 

where n = 20 for the 2314/2319 
19 for the 3330/3333 
12 for the 3340 

The value of CPL is rounded tc the next 
higher integer if a remainder results. 



GENERAL CONTROL STATEMENT FORMAT 

The librarian control statements are 
similar in format to statements processed 
by the assembler. The operation field must 
be preceded by one or more blanks. The 
operation field must begin tc the right of 
column 1 and must be separated from the 
operand field by at least cne blank 
position. The operand field is terminated 
by the first blank position. It cannot 
extend past column 71. Continuation 
statements are not recognized. 



statements apply to both system and private 
libraries; the reallocation function, 
however, cannot be used fcr private 
libraries. 

Tc invcke the maintenance program, use 
the following job control statement: 

// EXEC MAINT 

Cne or more of the maintenance functions 
fcr cne or more of the libraries can be 
requested within a single run: 



catalog 

delete 

rename 



condense 

reallocate 

update 



Any number of phases, modules, books, or 
procedures can be acted upon in cne run. 

Ncte: If POWER or any unending job is 
started with a cataloged procedure, no 
maintenance functions can be performed on 
the procedure library as lcng as the jcb is 
active. 

The following symbolic units must be 
assigned to perform maintenance functions 
en a private library: SYSCLE for a private 
cere image library, SYSRLE fcr a private 
relocatable library, and SYSSLE fcr a 
private source statement library. A 
private library must be unassigned to 
perform maintenance functions en the 
corresponding system libraries. 



CATALOG 

The catalog function, which adds elements 
to a library, is described in the following 
sections: 

CATALR -- to catalog tc the relocatable 
library 

CATALS -- to catalog to the source 
statement library 

CATALP -- tc catalog tc the procedure 
library. 

Note : To catalog to the core image 
library, refer to the chapter Linkag e 
Editcr. 



MAINTENANCE PROGRAM 

This section describes the control 
statements that can be submitted tc the 
MAINT program, which maintains the core 
image, relocatable, source statement, and 
procedure libraries. Except for the 
reallocation function of MAINT, all control 



CATAIR 

The CATALR control statement is used tc add 
a module to the relocatable library. The 
CATAIR ccrtrcl statement is read from the 
device assigned to SYSIPT and is in the 
following format: 

CATALR mcdulename[,v.m] 
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The operation field contains CATALR. The 
entry in the operand field, modulename, is 
the name by which the module is to be known 
to the control system. The module name is , 
one to eight characters, the first of which 
must not be an asterisk. 



Operands in INCLUDE statements refer to 
modules in the relocatable library. If, 
for example, the preceding calling module 
is cataloged by the name EIGPROG, all 
modules referred to in BIGPRCG can be 
link-edited by using the following control 
statements : 



( 



The opti 
v.m, specif 
the module 
any decimal 
any decimal 
operand is 
is assumed. 

A change 
a module is 
displayed a 
functions. 



onal entry in the operand field, 
ies the change level at which 
is to be cataloged. v may be 
number from 0-127. m may be 
number from 0-255. If this 
omitted, a change level of 0.0 



level can be assigned cnly when 
cataloged. The change level is 
nd punched by the service 



// OPTION CATAL 

INCLUDE BIGPROG 
// EXEC LKKEDT 



A calling module may consist only of 
INCLUDE statements. In this case, the 
PHASE statements would precede the included 
modules. 



The statements composing the input for a 
module are described in the Linkage Editor 
section. The statements are: 



1. 


PHASE 


2. 


INCLUDE control statement (if 




appropriate) 


3. 


ESD 


4. 


TXT 


5. 


RLD 


6. 


REP 


7. 


END 


8. 


ENTRY 



These statements are read from the device 
assigned to SYSIPT. All input is diagnosed 
by the linkage editor. The CATALR 
statement is recognized but ignored by the 
linkage editor. The END statement 
indicates end of module. 

The ENTRY statement can only be used in 
a module that contains only linkage editor 
control statements and an END statement. 
The ENTRY statement must be the last 
control statement in the module, following 
the END statement. 

Normally, modules in the relocatable 
library are output from a language 
translator. However, you can construct an 
artificial module of linkage editor control 
statements, referred to as a calling 
module. The following example illustrates 
a valid calling module: 

PHASE PHNAMl,ROOT 
INCLUDE MODULE1 
PHASE PHNAM2,* 
INCLUDE MODULE2 
PHASE PHNAM3,PHNAM2 



ENTRY CSECTNME 
END 



A ninth statement, SYM, can be in the 
linkage editor input. When recognized, 
however, it is bypassed by the linkage 
editor. (The SYM statement identifies the 
symbol table output by the assembler as a 
result of specifying SYM in the OPTION 
statement) . 



For the 
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disk unit, 
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disk unit, 
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, the WAINT 
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Any number of modules can be cataloged 
in a single run. Each mcdule must 
immediately follow its respective CATALR 
control statement. 



An additional capability of the system 
allows for assembling cr compiling a 
program and cataloging it to a relocatable 
library in cne continuous run. This is 
done by inserting a CATALR statement in the 
job control input stream preceding the 
phase statement (if present) and the 
assembler/compiler execute statement. The 
CATALR statement is written en the SYSPCH 
file, if SYSPCH is assigned, (on tape, 
EASD, or 3540 diskette) ahead of the 
assembler/compiler output. Then reassign 
the SYSPCH file as SYSIPT and execute the 
MAINT program to perform the catalog 
function. The output cf the 
assembly/compilation (on tape or DASD, or 
3540 diskette) may be cataloged immediately 
or it may be cataloged at some later time. 
It can alsc be held after cataloging as 
backup of the assembly/ccmpilaticn. 



< 
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CATALS 

The CATALS control statement is used to add 
a book to a sublibrary of the source 
statement library. It is read froir the 
device assigned to SYSIPT and is in the 
following format. 

CATALS sublib. bookname [, v.m [ ,C] ] 

The operation field contains CATALS. The 
qualifier sublib in the operand field 
represents the sublibrary to which the bcok 
is to be cataloged and can be any | 

alphameric character (0-9, A-Z, #, $, and 
a) , representing source statement 
sublibraries. 

The sublib qualifier is required. If 
omitted, the operand is flagged as invalid 
and no processing is done en the bcok. 

bookname in the operand field represents 
the name of the book to be cataloged. The 
bookname is one to eight alphameric 
characters, the first of which must be 
alphabetic (A-Z, #, $, and a). 

The first optional entry in the operand 
field, v.m, specifies the change level at 
which the book is to be cataloged, v may 
be any decimal number from 0-127. m may be 
any decimal number from 0-255. if this 
operand is omitted, a change level of 0.0 
is assumed. The change level is displayed 
and punched by the service functions. 
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Eooks that are to be c 
sublibrary of the source 
must be preceded and foil 
statements indicating the 
end of a book. 



try in the operand 
change level 
before updates are 
roviding the v.m 

update card (see 
statement). This 
in the CSERV 
n the column 
ck). 

ataloged in a 
statement library 
owed by special 
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Macro definitions that are to be 
cataloged in the assembler sublibrary are 
preceded by the MACRO statement and are 
followed by the MEND statement. MACRO is 
the standard macro definition header 
statement; MEND is the standard macro 
definition trailer statement. 

When books to be retrieved by the 
assembler COPY statement are tc be 
cataloged to the assembler sublibrary, the 
assembler END statement should net be 
included in the book. (Assembler does net 
recognize END statements from the source 
statement library.) 



Books other than macro definitions that 
are to be cataloged in the source statement 
library are preceded and followed by a 
EKEND statement. A EKENE statement must 
precede each bcok, and a EKEND statement 
must follow each book. If desired, the 
EKEND statement may precede and follow a 
macro definition (in addition to the MACRO 
and MEND statements) . This is desirable 
when the options provided in the BKEND 
stateirent are required. The statement is 
in the following format. 

EKEND [sub. book] , [seq-chk] , [count] , [CMPRSD] 

The entry in the operation field is BKEND. 
All operand entries are cpticnal. When 
used, the entries must be in the prescribed 
crder, and need appear only in the BKEND 
statement preceding the beck tc be 
cataloged. The first entry in the operand 
field, sub. book, is identical tc the 
operand of the CATALS control statement. 
The second operand seq-chk specifies that 
sequence checking is required. Which 
columns will be checked depends en how this 
operand is specified. Columns 73-78 will 
be checked if SEQNFS is specified. Columns 
77-80 will be checked if SEQNCE is 
specified. The count operand specifies the 
number of card images in the beck. When 
used, the card input is counted, beginning 
with the preceding BKEND statement and 
including the following EKENE statement. 
If an errcr is detected in either the 
sequence checking cr the card count, an 
error message is printed. The error can be 
corrected, and the beck can be recatalcged. 
The CMPRSD operand indicates that the book 
tc be cataloged in the library is in the 
compressed format, output as a result of 
specifying CMPRSD when performing a PUNCH 
or DSPCH service function. 

Fcr the catalog function, SYSIN must be 
assigned to a card reader, tape unit, cr 
disk unit, or a 3540 diskette. SYSIPT must 
be assigned to a card reader, a tape unit, 
a disk unit, cr a 3540 diskette. SYSLST 
must be assigned to a printer, a tape unit, 
cr a disk unit, and SYSLCG must net be 
assigned tc a printer. 

Any number of bcoks may be cataloged in 
a single run. Each beck must immediately 
follow its respective CATALS control. The 
function can also delete an entire 
sublibrary or an entire library. 



CATALP 

The CATALP control statement is used tc add 
a procedure to the procedure library. Any 
number cf procedures may be cataloged in a 
single run. Each procedure rrust 
immediately follow the respective CATALP 
statement. 
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Statement Format: 



CATALP procedurename [ f VM=v.ir] [,EOP=yy] 
£DATA= NO 1 
[ YESj 

Each control statement in the procedure 
library should have a unique identity. 
This identity is required if ycu want to 
modify the job stream at execution time. 
Therefore, when cataloging, identify each 
control statement in columns 73-79 (blanks 
may be embedded) . 



A procedure to be cataloged into the 
procedure library iray consist cf job 
control and linkage editor statements and, 
if the supervisor was generated with the 
SYSFIL option, any additional SYSIPT data 
which irust be processed under control cf a 
device-independent sequential IOCS module 
(fcr instance, control statements for 
utility programs and service programs, 
source statements for compilers and object 
modules fcr the linkage editcr) . The end 
of a procedure is indicated by the /+ 
end-cf-prccedure delimiter or ty the 
end-of-procedure delimiter as specified in 
the EOP parameter. 



( 



procedurename 

represents the name of the 
procedure to be cataloged. The 
procedurename consists of one to 
eight alphameric characters. 

Procedurenames can be related to 
the partition in which the 
procedure is intended to be run. 
A partition-related procedurename 
must follow these conventions: 



$B for the BG partition 

$1 for the Fl partition 

$2 for the F2 partition 

$3 for the F3 partition 

$4 for the F4 partition. 

The procedurename must net begin 
with $$ or ALL. 

specified the change level at 
which the procedure is tc be 
cataloged. v may be any decimal 
number from 0-127. m may be any 
decimal number from 0-255. If 
this operand is omitted, a change 
level of 0.0 is assumed. 

A change level can be assigned 
only when a procedure is 
cataloged. The change level is 
displayed and punched by the 
service functions. 



VM=v,m 



EOP=yy 



The 



specifies a two-character 
end-of-procedure delimiter. 
EOP parameter can be any 
combination of characters except 
/*, /£, //; it must net contain a 
blank or a comma. The system 
assumes /+ as default 
end-of-procedure delimiter. 
Otherwise you can emit the EOP 
parameter. 



DATA=YES specifies that a procedure 

contains SYSIPT inline data. 
These procedures can only be 
executed in the extended procedure 
support. 



For the catalog function, SYSIN must be 
assigned tc a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette, and SYSLOG 
must net te assigned tc a printer. If 
SYSIN is assigned to a tape unit, the MAINT 
program assumes that the tape is positioned 
to the first input record. The tape is not 
rewound at end of jot. 



A sample jcb stream follows. 



// JCB CATFROC 



ASSGN control statement, 
if required 



f 



// 



EXEC MAINT 

CATALP FROCA, EOP=/$ , DATA= YES 



ccntrcl statements 



SYSIPT inline data 



/* END OF SYSIPT DATA 



control statements 



/$ END OF PROCEDURE 



The following restrictions apply when you 
catalog procedures to the procedure 
library: 



1. A cataloged procedure cannot contain 
ccntrcl statements or SYSIPT data for 
more than one job. 
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If the cataloged control statements 
include the JOB statement, you must not 
have a JOB statement when you retrieve 
the procedure through the EXEC 
statement. Conversely, if the JOB 
statement is not cataloged, a JOB 
statement must precede the EXEC 
statement that retrieves the procedure. 

A cataloged procedure must not include 
any of the following control statements 
because they are not accepted when the 
procedure is processed: 

// ASSGN SYSRDR,X'cuu' 

// RESET SYS 

// RESET ALL 

// RESET SYSRDR 

// CLOSE SYSRDR, X'cuu' 

// ASSGN SYSIPT, X'cuu' 

// RESET SYSIPT only if SYSIPT data is 

included. 
// CLOSE SYSIPT, X'cuu' 

Cataloged procedures cannot be nested, 
that is, a cataloged procedure cannot 
contain an EXEC statement that invokes 
another cataloged procedure. 



DELETE 

The delete function, which removes 
references to specific elements cf a 
library, is described in the following 
sections: 

DELETC — to delete from the cere image 
library 

DELETR — to delete from the relocatable 
library 

DELETS — to delete from the source 
statement library 

DELETP — to delete from the procedure 
library. 



DELETC 

The DELETC control statement in one of the 
following formats is used to delete phases 
or programs from the core image library. 

DELETC phasenamelt ,phasename2, . . . ] 

DELETC progl.ALL[,prog2.ALL, . . . ] 



In the first format, the entry in the 
operation field is DELETC. phasename in 
the operand field represents the name(s) of 
the phase (s) to be deleted. The name cf 
the phase may be a maximum of eight 
characters. Entries in the operand field 
must be separated by commas. 



In the second format, prog refers to the 
first four characters of the program name. 
(All phases within a program have the same 
first four characters. Therefore, the 
first four characters of each program 
within the library should be unique.) The 
four characters are followed by a period 
and ALL. 

Any number of DELETC control statements 
can be used for the core image library 
within a single run. 

Fcr the delete function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette, and SYSLOG 
must not be assigned to a printer. 



EELETR 

The DELETR control statement in cne of the 
following formats is used to delete a 
module from the relocatable library. 

EELETR modname [, modname, . . . ] 

DELETR prcgl.ALL[,prcg2.ALL, . . . ] 

EELETR ALL 
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The third format is used if the entire 
library is to be deleted. The entry in the 
operation field is DELETR. The entry in 
the operand field is ALL. When this 
function is performed, the system status 
record is reset to show that all library 
blccks are new available to the system. 
Therefore, it is unnecessary tc perform a 
condense function after a DELETR ALL has 
been performed. 
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Any number of DELETR control statements 
can be used for the relocatable library 
within a single run. 

For the delete function, SYSIN rrust be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette, and SYSLOG 
must not be assigned to a printer. 



DELETS 

The DELETS control statement is used to 
delete books from the source statement 
library. The control statement is in one 
of the following formats. 

DELETS sublib.bookl[,sublib.book2, .. . ] 

I 

DELETS SUblib.ALL 

DELETS ALL 

The first format is used if only specific 
books are to be deleted. The entry in the 
operation field is DELETS. The qualifier 
sublib in the operand field represents the 
sublibrary containing the book to be 
deleted and can be any alphameric character 
(0-9, A-Z, #, $, and a), representing 
source statement sublibraries. 

The sublib qualifier is required. If 
omitted, the operand is flagged as invalid 
and no processing is done en the book. 

book in the operand field represents the 
name of the book in the sublibrary to be 
deleted. If more than one bcok is to be 
deleted, the entries must be separated by 
commas. If books to be deleted are in the 
same sublibrary, subsequent book names need I 
not be qualified. (The librarian assumes 
that nonqualified books are in the last 
sublibrary specified.) The name cf the 
book can be of any length; however, a 
maximum of the first eight characters is 
used to locate and delete the book. 
Continuation statements are not recognized. 

The second format is used if an entire 
sublibrary is to be deleted. The entry in 
the operation field is DELETS. The first 
entry in the operand field is the name of 
the sublibrary to be deleted. The 
qualifier sublib represents the sublibrary 
containing the book to be deleted and can 
be any alphameric character (0-9, A-Z, #, 
$, and a), representing source statement 
sublibraries. 



The second entry in the operand field is 
ALL. The two entries must be separated by 
a period. 



( 



The sublib qualifier is required. If | 
omitted, the operand is flagged as invalid 
and no processing is done en the | 

sublibrary. 



The third format 
source statement lib 
The entry in the ope 
The entry in the ope 
When this function i 
status reccrd is res 
library blocks are n 
system. Therefore, 
perform a condense a 
teen performed. 



is used if the entire 
rary is to be deleted, 
ration field is DELETS. 
rand field is ALL. 
s performed, the system 
et tc shew that all 
ow available to the 
it is unnecessary to 
fter a DELETS ALL has 



For the delete function, SYSIN must be 
assigned tc a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette, and SYSLOG 
must net he assigned tc a printer. 



EELETP 



The EELETP control statement in cne of the 
following formats is used to delete a 
procedure from the procedure library: 



(EELETP prccedurenaire [ , prccedurenaire, 
(EELETP ALL 



prccedurename 

specifies the name cf the 
procedure tc be deleted. If more 
than one procedure is tc be 
deleted, the names are separated 
ty commas. The procedure name is 
one to eight alphameric 
characters, the first cf which 
must be alphabetic cr $. 



ALL specifies tha 
is tc be dele 
ALL has been 
status record 
that all libr 
available tc 
Therefore, it 
perform a ccn 
a DELETP ALL 



t the entire library 
ted. After a DELETP 
performed, the system 

is reset to show 
ary blocks are new 
the system. 

is unnecessary to 
dense function after 
has been performed. 



Any number of DELETP ccntrcl statements can 
be used for the procedure library within a 
single run. 



Fcr the delete functicn, SYSIN must be 
assigned tc a card reader, a tape unit, a 
disk unit, cr a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette, and SYSLOG 
must net be assigned tc a printer. 
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RENAME 

The rename function, which changes the name 
of an element in a library, is described in 
the following sections: 

RENAMC — to rename a phase in the core 
image library 

RENAMR — to rename a module in the 
relocatable library 

RENAMS — to rename a book in the source 
statement library 

RENAMP — to rename a procedure in the 
procedure library. 

RENAMC 

The RENAMC control statement is used to 
change the name of a phase in the core 
image library to another name. If the new 
name is already in the directory or an old 
name is not in the directory, an error 
message is issued. On a valid pair of 
operands, the new name simply replaces the 
old name in the directory; the version and 
modification levels are not changed. In 
either case, a check is then made for more 
operands on the card. As seen as the /S 
statement is processed, only the new phase 
names exist in the directory. The RENAMC 
statement is in the following format. 

RENAMC oldname,newname [ ,oldname,newname, . . ] 

The operation field contains RENAMC. The 
operand field entries, oldnarre and newname, 
represent the old phase name and the new 
phase name. The two entries in the operand 
field must be separated by a comma. The 
names in the operand field may be a maximum 
of eight characters. Note; ALL is an 
invalid phase name. 

Any number of RENAMC control statements 
can be used for the core image library 
within a single run. 

For the rename function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette, and SYSLOG 
must not be assigned to a printer. 

RENAMR 

The RENAMR control statement is used tc 
change the name of a module in the 
relocatable library to another name. If 
the new name is already in the directory or 
an old name is not in the directory, an 
error message is issued. On a valid pair 
of operands, the new name simply replaces 
the old name in the directory; the version 



and modification levels are not changed. 
In either case, a check is then made for 
mere operands en the card. As scon as the 
statement is processed, the system 
recognizes enly the new ircdule name. The 
RENAMR statement is in the fcllowing 
format: 

RENAMR oldname,newnaire [ ,cldname,newname, . . ] 



The operation field contains RENAMR. The 
entries in the operand field, cldname and 
newname, represent the old mcdule-name and 
the new module-name, respectively, and are 
separated by a comrra . oldnam e and newname 
are one to eight characters, the first of 
which irust not be an asterisk. 

Any nuirter of RENAMR control statements 
can be used fcr the relocatable library 
within a single run. 



Fcr the rename functicn, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, cr a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, cr a 3540 diskette, and SYSLOG 
must not be assigned to a printer. 



RENAMS 



The RENAMS control statement is used tc 
change the name of a beck in the source 
statement library to another name. If the 
new name is already in the directory or an 
old name is not in the directory, an error 
iressage is issued. Cn a valid pair of 
operands, the new naire simply replaces the 
old name in the directory; the version and 
rrcdificaticn levels are net changed. In 
either case, a check is then made for more 
operands cn the card. As seen as the 
statement is processed, the system 
recognizes only the new book name. The 
RENAMS statement is in the following 
format. 

RENAMS sublib. oldname, sublib .newname 
[ , sublib. oldname, sublib. newname, . . . ] 



The operation field contains RENAMS. The 
qualifier sublib in the operand field 
represents the sublibrary containing the 
book to be renamed and can be any 
alphameric character (0-9, A-Z, #, $, and 
a) , representing source statement 
sublibraries. 



The subli b qualifier is required. if 
emitted, the operand is flagged as invalid 
and no processing is dene on the 
sublibrary. 
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old name and 
book name and 
newname is omi 
be the same as 
entries in the 
separated by c 
operand field 
however, only 
characters is 
and rename the 



newname represent the old 
the new book name. If 
tted, the name is assumed to 

for the oldname. The 

operand field must be 
ommas. The names in the 
can be of any length; 
a maximum of the first eight 
used by the system tc locate 

book. 



The DOS/VS assemblers flag any reference 
to a macro in the source statement library 
as an UNDEFINED OPERATION CODE if the 
cataloged name of the macro is net 
identical to the operation code in the 
macro prototype statement. The assemblers 
locate macros in the source statement 
library by the cataloged name, but 
thereafter use the operation code of the 
macro prototype statement for 
identification. 

Any number of RENAMS control statements 
can be used for the source statement 
library within a single run. 

For the rename function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette, and SYSLOG 
must not be assigned to a printer. 



RENAMP 

The RENAMP 
change the 
procedure 
new name i 
old name i 
message is 
operands, 
old name i 
modificati 
either cas 
operands o 
statement 
recognizes 
RENAMP sta 
format: 



control statement is used tc 

name of a procedure in the 
library to another name. If the 
s already in the directory or an 
s not in the directory, an error 

issued. On a valid pair of 
the new name simply replaces the 
n the directory; the version and 
on levels are not changed. In 
e, a check is then made for more 
n the card. As scon as the 
is processed, the system 

only the new module name. The 
tement is in the following 



RENAMP 

oldname, newname [ , oldname, newname, . . . ] 

oldname, represent the old procedure name 
newname followed by the new procedure 
name. The procedure names are 
from one to eight alphameric 
characters, the first of which 
must be alphabetic cr $. They 
must not be ALL. 

Any number of RENAMP control statements can 
be used for the procedure library within a 
single run. 



For the rename function, SYSIN must be 
assigned tc a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette, and SYSLOG 
must not be assigned to a printer. 



CONDENSE 

The condense function eliminates vacancies, 
resulting from delete or catalog functions. 
The condense function is used when a number 
of vacancies have accumulated within the 
library. Condense can te requested via one 
of two control statements: 

CONDS — condenses any or all of the 
libraries when issued 

CONDL — condenses any or all cf the 

libraries automatically when a 
specified limit is reached. 

CONDS 

The CONDS control statement, in the 
following format, is used to condense the 
cere image library: 

CONDS CL 



( 



The operation 
operand field 
library, the 
and/cr the pr 
condensed in 
the entry RL 
SL (for the s 
PL (for the p 
in the operan 
the operand f 



field contains CONDS. The 
contains CL. The relocatable 
source statement library, 
ocedure library can also be 
this run. If this is desired, 
(for the relocatable library), 
ource statement library), and 
rocedure library) can appear 
d field. Multiple entries in 
ield are separated by commas. 



The CONDS statement, in the following 
format, is used to condense the relocatable 
library: 

CCNDS RL 

The CONDS statement, in the following 
format, is used to condense the source 
statement library: 

CONDS SL 

The CONDS statement, in the following 
format, is used to condense the procedure 
library: 

CONDS PL 

Fcr the condense function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, cr a 3540 diskette, SYSLOG must 
not be assigned to a printer. 






i 
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CQNDL 

The condense maintenance function can be 
performed automatically at the end of a 
catalog or delete maintenance function 
under the control of an installation 
specified parameter. The parameter is 
stored in the system directory. It 
indicates that when the number of blocks 
available in the corresponding library is 
less than the number specified by the 
parameter, and at least one directory entry 
is deleted, the condense function is 
performed for that library. The system 
interrogates the parameter at the 
completion of each maintenance function for 
the library. If a condense function is to 
be performed, a message appears on SYSLOG 
to inform the operator that the library is 
to be condensed. If a private core image 
library is assigned to more than one 
partition, the condense is not performed. 
If multiprogramming is in progress, the 
auto-condense is ignored for any library 
except a private core image library. Also, 
if condense (CONDS) is specified when MAINT 
is executed and a private core image 
library is assigned to a foreground 
partition, the condense is not performed. 

The CONDL control statement (as opposed 
to the CONDS control statement for a 
user-specified condense function) informs 
the MAINT librarian program that a 
parameter to specify an automatic condense 
is to be set. The CONDL control statement 
is in the following format. 

CONDL lib=nnnnn[, lib=nnnnn, . . . ] 

In the operand field, the entry lib is CL 
for the core image library, RL for the 
relocatable library, SL for the source 
statement library, and PL for the procedure 
library. The entry nnnnn represents the 
number of blocks specified for the specific 
library and is from one to five decimal 
digits. The maximum value of nnnnn is 
65536. Each track of the core image 
library contains 3 blocks on the 2311 
(private core image library only) , 6 blocks 
on the 2314/2319, 11 blocks on the 
3330/3333, or 7 blocks on the 3340. Each 
track of the relocatable library contains 
16 blocks on the 2314/2319, 28 blocks on 
the 3330/3333, or 17 blocks on the 3340. 
Each track of the source statement library 
contains 27 blocks on the 2314/2319, 44 
blocks on the 3330/3333, or 26 blocks on 
the 3340. Each track of the procedure 
library contains 40 blocks on the 
2314/2319, 61 blocks on the 3330/3333, or 
34 blocks on the 3340. 

If (zero) is specified for nnnnn, an 
automatic condense is not performed for the 
specific library. If the number of blocks 
specified exceeds the number of blocks 



allocated for the library, a condense is 
performed each time deleted blocks appear 
in the library at the end of a maintenance 
function. When the system is copied onto 
another pack, the condense limit en SYSRES 
is set to zero. 

The automatic condense of the core image 
library is bypassed when a new supervisor 
is cataloged. 

The condense limits are displayed with 
the system status on a DSERV and at the end 
of a maintenance job. 

The control statement input to establish 
a value for an automatic condense is the 
same as that for a user-specified condense. 
See the section CONDS for a description of 
the control statement input. 



REALLOCATE 

The reallocation function redefines the 
number of tracks and cylinders allotted to 
a disk-resident system. 

The EXEC control statement required to 
perforir a reallocation function is in the 
following format: 

// EXEC MAINT 

Associated with the EXEC statement for the 
reallocation function is the ALLOC control 
statement. The ALLOC control statement is 
in the following format: 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 



The operation field contains ALLOC. The 
operand field contains a sequence of letter 
combinations and cylin (tracks) . The 
library identifiers are as follows: 

CL = core image library and directory 
RL = relocatable library and directory 
SL = source statement library and directory 
PL = procedure library and directory. 



All operands of the ALLOC statement are 
required. If a specific library is not 
present, an allocation of 0(0) must be 
supplied. 



The entry, 
refers to the 
contain the s 
track, is enc 
refers to the 
the specified 
tracks alloca 
contained in 



cyli n, in the operand field 
number of cylinders that 
pecified litrary. The entry, 
losed within parentheses and 
number of tracks that contain 
library directory. The 
ted to the directory are 
the cylinders allocated to the 
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library. The keyword operands are 
separated by a comma if more than one 
operand is present. For maximum 
efficiency, all requested operands should 
be entered on one statement. 

For the reallocation function, SYSIN 
must be assigned to a card reader, a tape 
unit, a disk unit, or a 3540 diskette. 
SYSLST must be assigned to a printer, a 
tape unit, or a disk unit, or a 3540 
diskette, and SYSLOG must not be assigned 
to a printer. 

If message 4n44& comes up due tc a 
change in the label set when reallocating 
SYSRES, type DELETE on SYSLOG. The job 
continues using new extents. 



UPDATE 

The update function updates properly 
identified statements within a book of a 
source statement library. 

The UPDATE control statement has the 
following format: 

UPDATE sublib. bookname , [s. bcokl] , [v.m] , [nn] 

The operation field contains UPDATE. 

sublib in the operand field represents 
the sublibrary that contains the book to be 
updated. It may be any of the characters 
A-Z, 0-9, $, a, or #. 

bookname represents the book that is to 
be updated in the sublibrary. 

s^bookl in the operand field provides a 
temporary update option. The old book is 
renamed s^bookl and the updated book is 
named subl ib . bookname . s indicates the 
sublibrary that contains the old, renamed 
book. It may be one of the characters A-Z, 
0-9,, $, a, or #. If this operand is not 
specified, the old book is deleted. 

v.m represents the change level of the 
book to be updated. y may be any decimal 
number from 0-127. m may be any decimal 
number from 0-255. This operand must be 
present if change level verification is to 
be done, and it must correspond to the 
change level in the book's directory entry. 
If the change level is verified, the change 
level in the book's directory entry is 
increased by 1 for verification of the next 
update. If m is at its maximum value and 
an update is processed, m is reset to and 
the value of v is increased by 1. 

If both y and m are at their maximum 
values and an update is processed, both y 
and m are reset to zeros. If the directory 
entry specifies that change level 



verification is not required before 
updating, the change level operand in the 
statement is ignored. Use of the optional 
entry C in the CATALS control statement at 
the time the book is cataloged tc the 
library determines if change level 
verification is required before updating. 



nn in the operand field r 
resequencing status required 
update. nn may be a one- or 
decimal number from 1-10, or 
characters FS or the word NO 
decimal number, it represent 
that will be used i-n reseque 
statements in the book. For 
by IBM since Release 28, nn 
(fixed sequence) . When nn i 
resequencing can be perfcrme 
NO, the statements will not 
If nn is not specified, the 
be resequenced with an incre 
When a book is resequenced, 
number of the first statemen 
with zeros. 



epresents the 

for the 

two-character 

it may be the 
If nn is a 
s the increment 
ncing the 

books supplied 
irust be FS 
s FS , no 
d. If nn is 
be resequenced. 
statements will 
ment of 1. 
the sequence 
t is padded 



Note: See the section CATALS for 
additional information about sequence 
numbering books in a source statement 
library. 

The UPDATE control statement is followed 
by ADD, DEL (delete), and/cr REP (replace) 
control statements as required. Each ADD 
or REP statement is followed by source 
statements that are to be added to the 
book. The update section is terminated by 
an END statement. The ADD, DEL, REP, and 
END statements are identified as update 
control statements by a right parenthesis 
in the first position (column 1 in card 
format). The second position is blank. 
This is a variation from the general 
librarian control statement format, but it 
clearly identifies these control statements 
as part of the update function. 

ADD Statement 

The ADD statement is used for the addition 
of source statements to a book. The format 
is: 

) ADD seq-no 

ADD indicates that source statements 
following this statement are to be added to 
the book. 

seg-np represents the sequence number of 
the statement in the bcok after which the 
new statements are tc be added. It may be 
any decimal number from one to four 
characters in length (columns 77-80) . If 
FS was specified in the UPDATE control 
statement, seq-no may be any decimal number 
from one tc six characters in length 
(columns 73-78). (Columns 79-80 of 
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IBM-supplied books contain the release 
number.) If FS was specified, alsc note 
that the seq-no of the first and only the 
first ) ADD statement iray be zero. In this 
case, the source statements that fellow are 
added in front of the first source 
statements of the book (provided that their 
sequence numbers are lower than those of 
the first source statements in the book) . 

DEL Statement 

The DEL statement causes the deletion of 
source statements from the book. The 
format is: 

) DEL f irst-seq-not , last-seq-no] 

DEL indicates that statements are to be 
deleted from the book. 

first-seq-no and last-seq-nc represent 
the sequence numbers of the first and last 
statements of a section to be deleted. 
Each number may be any deciiral number from 
one to four characters in length (columns 
77-80). If FS was specified in the UPDATE 
control statement, each number may be any 
decimal number from one to six characters 
in length (columns 73-78) . Note: The 
first-seq-no must not be zero. If 
last-seq-no is not specified, the statement 
represented by first-seq-no is the only 
statement deleted. 

To delete an entire book, use the DELETS 
function. 

REP Statement 

The REP statement is used when replacement 
of source statements in a book is required. 
The format is: 

) REP f irst-seq-not , last-seq-nc] 



This indicates that source statements 
following the REP statement are tc replace 
existing source statements in a book. 

first-seq-no and last-seq-no represent 
the sequence numbers of the first and last 
statements of a section to be replaced. 
Each number may be a decimal number from 
one to four characters in length (columns 
77-80). If FS was specified in the UPDATE 
control statement, each number may be any 
decimal number from one to six characters 
in length (columns 73-78) . Note: The 
first-seq-no must not be zero. Any number 
of new statements can be added to a bock 
when a section is replaced. (The number of 
statements added need not equal the number 
of statements being replaced.) 

To replace an entire book, use the 
DELETS and CATALS functions. 



If FS was not specified in the UPDATE 
ccntrol statement, sequence number 9999 is 
the highest number acceptable fcr a 
statement to be updated. If the book is so 
large that statement sequence numbers have 
wrapped around to zeros, it is net possible 
tc update. 



If FS was specified 
ccntrol statement, 999 
In this case, 999999 n 
sequence number. Spec 
last-seq-no in ) DEL or 
indicates that the scu 
beginning with the fir 
and including the last 
the bock are tc be del 



in the UPDATE 
999 is the maximum, 
eed not be an actual 
ifying 999999 as the 

) REP cards 
rce statements 
st-seq-no and up to 

source statement of 
eted or replaced. 



If FS wa s specified in the UPDATE 
control statement, any source statement 
following the ) ADD cr ) REP ccntrol 
statement should have the following format: 



Columns 

1-72 contain any user's scurce statement. 

73-78 must contain a sequence number which 
must be greater than the sequence 
number after which it is inserted, 
and less than the subsequent 
sequence number. 

79-80 may contain any character including 
blanks. 

Note: If scurce cede following ) ADD or ) 
REP contains blanks in columns 73-78, the 
sequence number of that scurce cede will be 
defaulted to the previous sequence number 
plus one, and columns 79/80 will be filled 
in by **. 

If FS was not specified in the UPDATE 
control statement, any scurce statement 
following the ) ADD or ) REP control 
statement should have the following format: 



Columns 

1-72 contain any user's source statement. 

73-76 contain a program identifier. 

77-80 may contain a sequence number. If 
used, each number must be greater 
than the sequence number after which 
it is inserted, and less than the 
subsequent sequence number. 



Ncte: See the section CATALS fcr 
additional information about sequence 
numbering books in a scurce statement 
library. 



Librarian 129 



END Sta te men t 

This statement indicates the end of an 
update to a book. The format is: 

) END [v.m[,C]] 



END indicates the end of updates tc a book. 

The v.m operand provides another means 
of explicitly setting the change level of a 
book in the library. (The ether way is 
through the use of the v.m operand in the 
CATALS statement.) v may be any decimal 
number from 0-127. m may be any decimal 
number from 0-255. 

C indicates that change level 
verification is required before any 
subsequent updates to this bcok. 

If v.m is specified and C is omitted, 
the book does not require change level 
verification before a subsequent update. 
This feature removes a previously specified 
verification requirement for a particular 
book. 



2. The second operand must be greater than 
the first operand in a DEL or REP 
statement. If net, the statement is 
considered invalid, it is flagged, the 
bock is not updated, and the remaining 
control statements are checked for, 
validity. If a second operand is 
present on an ADD statement, it is 
flagged as an invalid operand and 
ignored. The book is updated and 
normal processing continues. All 
options of the UPDATE and END 
statements are ignored. 

3. All updating to a bock between an 
UPDATE statement and an END statement 
must be in ascending sequential order 
cf statement sequence numbers. The 
first operand cf a DEL or REP statement 
must be greater than the last operand 
of the preceding control statement. 
The operand of an ADD statement must be 
equal to or greater than the last 
operand cf the preceding contrcl state- 
ment. Consecutive ADD statements must 
not have the same operand. If these 
conditions are net met, the default is 
the same as for items 1 and 2. 



If both optional operands are emitted, 
and change level verification was required 
for this update, the change level in the 
book's directory entry is increased, as the 
result of the update, and the verification 
requirement remains unchanged. 

UPDATE FUNCTION INVALID OPERAND DEFAULTS : 

UPDATE Statement : 

1. If the first or second operand is 
invalid, the statement is flagged, the 
book is not updated, and the remaining 
control statements are checked for 
validity. 

2. If change level verification is 
required and the wrong change level is 
specified, the statement is flagged, 
the book is not updated, and the 
remaining control statements are 
checked for validity. 

3. If the resequencing operand is 
invalid, resequencing is done in 
increments of 1. The job will be 
canceled if FS was required. 

ADD T DEL X „_or_REP Statements : 

1. If there is an invalid operation or 
operand in an ADD, DEL, or REP 
statement, the statement is flagged, 
the book is not updated, and the 
remaining control statements are 
checked for validity. All options of 
the UPDATE and END statements are 
ignored. 



END Statement : 
END statement is 
flagged, both op 
book is updated 
present. If the 
the statement is 
ignored, and the 
the second opera 



If the first operand of the 
invalid, the statement is 

erands are ignored, and the 

as though no operands were 
secend operand is invalid, 
flagged, the operand is 
bcok is updated as though 

nd was net specified. 



Out -cf- S 
specif ie 
the sour 
must be 
net upda 
statemen 
the sour 
contain 
number w 
sequence 
will be 



equence Updates 
d in the UPDATE 
ce statements tc 
in sequence; oth 
ted and the rema 
ts are checked f 
ce statements tc 
sequence numbers 
ill be defaulted 
number plus one 
filled in by **. 



If FS was 
control statement , 

be added to a beck 
erwise, the book is 
ining ccntrol 
cr validity. If 

be added do net 
, the sequence 

to the previous 
, and columns 79-80 



If FS was n et sp ecified in the UPDAT E 
ccntr ol statem ent, and if the source 
statements to be added to a book are not in 
sequence, cr do net ccntain sequence 
numbers, the book is updated and a message 
indicating the error appears following the 
END statement. If the resequencing option 
has been specified in the UPDATE statement, 
the beck is sequenced by the specified 
value and subsequent updating is possible. 
If the resequencing option is not 
specified, the book is resequenced in 
increments of 1 and subsequent updating is 
possible. If the resequencing option NO is 
specified, the updated beck is net in 
sequence and subsequent updating may net be 
possible. 
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For the update function, SYSIN irust be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette, and SYSLOG 
must not be assigned to a printer. 



UPDATE Fu nctio n - Act ivity Lo g; The UPDATE 
function provides a log, on SYSLST, of all 
update activity to books in the source 
statement library. The log indicates the 
operation performed and all operands of the 
update control statements. It alsc shows 
the contents of the source statements 
affected, including the old prograrr 
identification and sequence number, the new 
program identification and sequence number, 
and the update activity involved. Figures 
31 and 32 show examples of an UPDATE jcb 
stream and an UPDATE activity log, 
respectively. 



If no resequencing has been specified, 
only the old ID and sequence numbers of the 
statements involved are indicated. 



// JCB UPDATE 
// EXEC MAINT 

UPDATE A.TESTCASE 
) REP 0032 
OPTNFND CLC 
) REP 0039,0044 
OPTNCHK CLC 

BE 

CLC 
) ADD 0052 
PUNCH MVI 

B 
) DEL 0134,0135 
) END 



0(1,REGG), BLANKS 

0(5,REGG) ,=C PUNCH' 

PUNCH 

0(5,REGG) ,=C'CSPCH* 

SWITCH, C'X' 
CHKOPND 



Figure 31. Example cf ar UPDATE Jcb Stream 



> 



UPDATE A.TESTCASE 










) REP 0032 












OPTNFND 


CLI 


0CREGG),C ' 


Ai+530032 






OPTNFND 


CLC 


0Cl,REGG), BLANKS 


Ai+530032 


A4530027 


REPLACEMENT 


) REP 0039, 


004^ 










OPTNCHK 


CLC 


0C5,REGG5, PUNCHOP 


A4530039 








BNE 


CHKDSP 


A't5300 1 t0 








MVI 


SWITCH, C'X' 


At+5300<+1 








B 


CHKOPND 


A45300<+2 






CHKDSP 


CLC 


0C5,REGG), DSPCHOP 


Ai+530043 








BNE 


MSGLOG 


Ai+530044 






OPTNCHK 


CLC 


0C5,REGGD,=C'PUNCH ' 


A4530039 


A<+53003<+ 


REPLACEMENT 




BE 


PUNCH 


At+530040 


A<+530035 


REPLACEMENT 




CLC 


0C5,REGG),=C'DSPCH ' 


A45300it1 


A*+530036 


REPLACEMENT 


) ADD 0052 














B 


MSGLOG 


A4530052 


A'+5300'ti+ 


RESEQUENCED 


PUNCH 


MVI 


SWITCH, C'X* 


Ai+530053 


A45300«t5 


ADD 




B 


CHKOPND 


A453005'+ 


A'f5300'+6 


ADD 


) DEL 013*+, 


0135 










DSPCHOP 


DC 


C'DSPCH ' 


A4530134 




DELETE 


PUNCHOP 


DC 


C PUNCH ' 


A14530135 




DELETE 


) END 













Figure 32. Example of an UPDATE Activity Leg 
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Example I 

col. 1 

// EXEC MAINT 

UPDATE Z . TESTBOOK , Z . SAVEBCOK , , FS 
) ADD 24310 

CLC SSEXTNT(4) , ZERO 

BE IGNORE 
) REP 25430 

BCT WRKREG2,LOOP 
) DEL 26210,26230 
) END 
/* 



ccl. 73-80 



SSL ALLOCATED 024313AS 
NC 



LCOP TWICE 



024316AS 
025430 



( 



EXAMPLE OF AN UPDATE JOB STREAM FOR 
IBM-SUPPLIED BOOKS 

A book in the sublibrary Z named TESTBOOK 
has to be updated temporarily. The old 
book is to be renamed: SAVEBOOK. 
Two statements are to be added after the 
source statement with sequence number 
(columns 73-78): 024310. One statement 
with sequence number 025430 is to be 
replaced. Three subsequent statements with 
sequence numbers: 26210, 26220, 26230 are 
to be deleted. The control statements are 
shown in Example I. 



COPY PROGRAM 



allocation. A zerc allocation is not 
possible for the system core image 
library. The directory allocation for 
the CII is at least two tracks: one 
directory for cataloged phases and one 
directory for linked phases. (The 
first two tracks of the system 
residence file should be taken into 
account for the number of cylinders 
allocated to the SCIL. These two 
tracks are used by the system for IPL 
information and a system workarea.) 



The fcrmat of the ALLOC statement is 
identical to the ALLOC statement 
described earlier in the section 
Reallocate. 



This section describes the control 
statements that can be submitted to the 
CORGZ program, which performs the following 
operations, individually or in combination: 

1. Defines and/or creates a new system 
pack. 

2. Defines and/or creates private 
libraries. 

3. Transfers phases, modules, or books 
between any assigned libraries. 

To invoke the CORGZ program, use job 
control statement: 

// EXEC CORGZ 

Associated with the EXEC statement are 
three independent copy control statements 
and five COPY statements. The three 
independent copy control statements are: 

1. ALLOC statement. Defines the libraries 
on a new system resident pack. If this 
statement is omitted, or if any of the 
libraries is not allocated in the 
statement, the job is canceled. If no 
assignments for a particular library 
are to be made, the assignment should 
nevertheless be included with a zero 



To use the reallocated or newly created 
pack as system residence file, you must 
re-IPL this pack again. 



2. NEWVOL statement (see the section 
Creation of Private Libr aries) . 
Defines private libraries. 

3. MERGE statement (see the section Merge 
Functicn) . Transfers data between 
libraries that were defined, or defined 
and created previously. 

The following functions are performed 
automatically by the CORGZ program, when 
the ALLOC statement is used: 

• All programs essential to a minimum 
system are copied. These programs are 
all logical and physical transients, 
IPL, supervisor, job control, and 
linkage editor. 

• The partition and system standard labels 
are copied from the SYSRES label 
cylinder to the label cylinder en 
SYS002. 

• Cylinder 0, track 0, records 1 and 2, 
and cylinder 0, track 1 are built. 



< 
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COPY, ALL SYSTEM LIBRARIES 



COPYR ALL 



The COPY control statement copies the 
complete system, but can only be used when 
SYSRES contains all four libraries. The 
information copied into the new pack 
includes cylinder (track 0, records 1 and 
2, and track 1), the four libraries, the 
label cylinder, and the VTCC cylinder. It 
is in the following format: 

COPY ALL 

This statement is valid only when preceded 
by an ALLOC statement. 



COPY, CORE IMAGE LIBRARY 

The COPYC control statement is used to 
specify the phases or programs in the core 
image library that are to be ccpied. It is 
in one of the following formats. 

COPYC phaselt,phase2, . . . ] 

COPYC progl.ALL[,prog2.ALL, . .. ] 

COPYC ALL 

The first format is used when specific 
phases are to be copied. The entry in the 
operation field is COPYC. The entry, 
phase, in the operand field represents the 
name(s) of the phase (s) to be copied. 
Entries in the operand field must be 
separated by commas. 



The second 
programs are t 
the operation 
prog. ALL, in t 
the name of th 
is the first f 
name. (All ph 
the same first 
followed by a 
the operand fi 
commas. 



format is used when specific 
o be copied. The entry in 
field is COPYC. The entry, 
he operand field represents 
e program to be copied. pro g 
our characters of the program 
ases within a program have 

four characters.) grog is 
period and ALL. Entries in 
eld must be separated by 



The third format is used to copy the 
complete core image library. The entry in 
the operation field is COPYC. The entry in 
the operand field is ALL. 



COPY, RELOCATABLE LIBRARY 

The COPYR control statement is used to 
specify the modules in the relocatable 
library that are to be copied. It is in 
one of the following formats. 

COPYR modulel[,module2, . . . ] 

COPYR progl.ALL[,prog2.ALL, . . . ] 



The first format is used when specific 
modules are to be copied. The entry in the 
operand field is COPYR. The entry, module, 
in the operand field represents the name(s) 
cf the ircdule(s) to te ccpied. Entries in 
the operand field must be separated by 
commas. 

The seccnd format is used when specific 
programs are to be copied. The entry in 
the operation field is CCPYR . The entry, 
prog, in the operand field represents the 
name of the program to be copied, prog is 
the first three characters of the program 
name. (All modules within an IBM-supplied 
program have the same first three 
characters, such as IJE for the supervisor 
and UK for PL/I). prog is followed by a 
pericd and ALL. Entries in the operand 
field must be separated by commas. 

The third format is used to ccpy the 
complete relocatable library. The entry in 
the operation field is CCPYR. The entry in 
the operand field is ALL. 



CCPY, SOURCE STATEMENT LIERARY 

The COPYS control statement is used to 
specify the books in the source statement 
library that are to be ccpied. It is in 
one of the following formats. 

COPYS sublib.bookl[,sublib.bcok2, . .. ] 

COPYS sublibl . ALL [ , sublib2 . ALL , . . . ] 

CCPYS ALL 

The first format is used when specific 
books are to be copied. The entry in the 
cperaticn field is CCPYS. The qualifier 
sublib in the operand field represents the 
name of the sublibrary containing the book 
and can be an alphameric character (0-9, 
A-Z, #, $, and a), representing source 
statement sublibraries . 

The sublib qualifier is required. If 
omitted, the operand is flagged as invalid 
and no processing is dene en the book. 

bcok represents the name(s) cf the 
book(s) to be copied. 

The second format is used when an entire 
sublibrary is to be ccpied. The entry in 
the operation field is CCPYS. The entry, 
sublib, in the operand field represents the 
name of the sublibrary tc be ccpied and can 
be any alphameric character (0-9, A-Z, #, 
$, and a) , representing scurce statement 
sublibraries. 
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The sublib qualifier is required. If 
omitted,, the operand is flagged as invalid 
and no processing is done on the 
sublibrary. The qualifier sublib is 
followed by a period and ALL. 

The third format is used to copy the 
complete source statement library. The 
entry in the operation field is COPYS. The 
entry in the operand field is ALL. 

COPY, PROCEDURE LIBRARY 

The COPYP control statement is used to 
specify the procedures in the procedure 
library that are to be copied. It has the 
following format: 

COPYP procedurename [, procedurename, . . . ] 
ALL 

procedurename specifies the name of the 

procedure to be copied. If 
more than one procedure is tc 
be copied, the names must be 
separated by ccmiras. | 



ALL 



specifies that the entire 
procedure library is to be | 
copied. 



When executing the copy disk (CORGZ) 
function, a file must be defined for 
IJSYSRS en SYS 002 via DLEL and EXTENT 
control statements. The filename en the 
DLBL statement must be IJSYSRS. The file 
identification portion of the DLEL 
statement can be as shown in the example of 
the copy function. 

The lower extent for this file must be 
cylinder zero, track one, and the upper 
extent must include the label cylinder. 
The label cylinder is one cylinder reserved 
for label information, and is located en 
the cylinder immediately following the last 
library cf the system. The total 
allocation must include cylinder 0, all 
defined system libraries, and the label 
cylinder. 

Figure 33 shows an example of a valid 
job setup for the copy function. 

For the ccpy function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYS002 must 
be assigned to a disk unit. SYSLST must be 
assigned tc a printer, a tape unit, a disk 
unit, or a 354 diskette, and SYSLOG must 
net be assigned to a printer. 



COPY, IPL 

The COPYI control statement is used to 
transfer the IPL Retrieval Program 
($$A$IPL2) between the SYSRES and SYS002 
(RES and NRS) volumes. It is in the 
following format. 

COPYI $$A$IPL2 



CREATION CF PRIVATE LIERARIES 



The COPY program can be used tc create 
private libraries. SYS003 must be assigned 
if a private core image library is 
required. SYSRLB must be assigned if a 
private relocatable library is required. 
SYSSLB must be assigned if a private scurce 
statement library is required. 



COPY CONSIDERATIONS 

Each library that is to be selectively 
copied requires a separate group of control 
statements. Any number of elements of a 
particular library can be specified in one 
control statement. Continuation statements 
are not valid. All entries in the operand 
field must be separated by commas. 



When creating a private library using 
CORGZ, a file must be defined fcr IJSYSPC 
on SYS003 and/or IJSYSRL en SYSRLB and/or 
IJSYSSL on SYSSLB. IJSYSPC, IJSYSRL, and 
IJSYSSL are the respective file names used 
in the creation of private cere image, 
relocatable, and source statement 
libraries. 



// JOB COPY 

// ASSGN SYS002,X , 191' 

// DLBL IJSYSRS, * DOS/VS SYSTEM RESIDENCE FILE ', 99/365, SD 

// EXTENT SYS002, 111111, 1,000,00001, 02519 

// EXEC CORGZ 

ALLOC CL=60(10) ,RL=30(10) ,SL=30(10) ,FL=5(5) 

COPY ALL 



/* 
/£ 



Figure 33. Example of a Valid Job Setup for the Copy Function 
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Creation of a private library is 
requested by the NEWVOL control statement. 
Its format follows. 



NEWVOL id=cylin (track) [,id=cylin (track)] 

id Indicates the specific library and 
directory to be created and can 
be: 

CL for a private core image 
library and directory 

RL for a private relocatable 
library and directory 

SL for a private source statement 
library and directory. 

cylin Indicates the number of cylinders 
to contain the specified library. 

track Indicates the number of tracks to 
contain the specified library 
directory. The tracks allocated 
to the directory are contained 
within the cylinders allocated to 
the library. The difference 
between the number of cylinders 
for the library and the number of 
tracks for the library directory 
has to be at least 5 tracks. 

The COPY program also provides the 
ability to copy all or part of the system 
core image and/or relocatable and/or source 
statement library into its respective 
private library. If this facility is to be 
used, it must be employed in the same job 
step in which the private library is 
created. This is done by inserting COPYC 
and/or COPYR and/or COPYS statements 
immediately behind the NEWVOL statement (s) 
in the job stream. 

To define and create a private library 
from an existing private library, the MERGE 
statement must be used between the NEWVOL 
and the COPYR and/or COPYS statements (This 
does not apply for the COPYC statement). 
Below is an example of the sequence of 
steps. 

// EXEC CORGZ 

NEWVOL RL=10(2),SL=10(1) 

MERGE PRV,PRV 

COPYR ALL 

COPYS ALL 
/* 
/£ 

The following precautions should be 
observed. 

1. When a NEWVOL statement and a COPYC 

and/or a COPYR and/or a COPYS statement 
are both present, the NEWVOL statement 



must precede the COPYC, COPYR or COPYS 
statement. 

2. The creation of a new system residence 
file and creation cf private libraries 
cannot both be done in the same job 
step. 

3. For each job, label cards for the 
private libraries containing the same 
information as at creaticn time must be 
submitted. N ot e: Private libraries 
are net required tc begin en a cylinder 
boundary. 



MERGE FUNCTION 

The MERGE function copies the contents of 
one core image, relocatable, source 
statement, or procedure library to another 
core image, relocatable, source statement, 
cr procedure library, respectively. If the 
phase, module, book, or procedure being 
copied already exists in the library being 
updated, the resident phase, module, book, 
or procedure becomes inaccessible because 
its directory entry is deleted. Any phase, 
module, beck, or procedure being copied is 
added to the library at the next available 
entry point. Its directory entry is added 
at the directory's next available entry 
pcint. 

The ccntrol statement indicates the type 
of library (resident or private) involved 
and the direction in which the data will 
move. It has the following format: 

MERGE from, to 



The operand field entry from represents the 
file from which data will be copied. from 
can be one of these: 

RES System residence file on SYSRES. 

NRS Modified, or duplicate system 
residence file on SYSQ02 (New 
Residence) . 

PRV Private relocatable library on SYS001 
and/cr a private source statement 
library on SYS000 and/or a private 
core image library en SYS003. 



The operand field entry tc indicates the 
file to which library data will be 
transferred, to can be cne cf these: 

RES System residence file en SYSRES. 

NRS Modified, or duplicate system 
residence file on SYS002 (New 
Residence) . 
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PRV Private relocatable library on SYSRLB 
and/or private source statement 
library on SYSSLB and/or a private 
core image library on SYSCLB. 

The MERGE statement is followed by 
appropriate copy statements (COPYC, COPYR, 
COPYS, COPYP) that indicate the phases, 
modules,, books, or procedures to be 
transferred. 

All copy statements following a MERGE 
statement apply to that function until 
another MERGE, NEWVOL, or ALLOC statement 
is encountered. 



1. The relocatable library of the system 
residence file on SYSRES and the 
relocatable library cf another system 
residence file on SYS002. 



2. A private relocatable library and the 
relocatable library cf the system 
residence file on SYSRES. 

3. A private relocatable library and the 
relocatable library cf a system 
residence file on SYS002. 

4. Two private relocatable libraries. 



Notes: 



1. If the COPYC ALL statement is used, the 
supervisor and transient phases are 
also transferred to the receiving 
system resident file or private core 
image library. The supervisor and 
transients previously contained on the 
receiving SYSRES or SYSCLB disk pack 
are deleted. No indication of this 
deletion is given, and it is the user's 
responsibility to ensure that the 
receiving system is able to continue 
operating. 

2. If COPY ALL or COPYI $$A$IPL2 is 
specified, the IPL bootstrap phase at 
cylinder 0, track 1, record 5 cf SYSRES 
is copied. 

Core Image Library 

Selected phases, or the entire library, can 
be transferred (in either direction) 
between: 

1. The core image library of the system 
residence file on SYSRES and the cere 
image library of another system 
residence file on SYS 002. 

2. A private core image library and the 
core image library of the system 
residence file on SYSRES. 



Source Statement Library 

Selected books or the entire library, can 
te transferred (in either direction) 
between: 

1. The source statement library of the 
system residence file en SYSRES and the 
source statement library of another 
system residence file en SYS002. 

2. A private source statement library and 
the source statement library of the 
system residence file on SYSRES. 

3. A private source statement library and 
the source statement library of a 
system residence file en SYS002. 

4. Two private source statement libraries. 



Procedure Library 

Selected procedures, cr the entire 
procedure library, can be transferred (in 
either direction) between the procedure 
library of the system residence file on 
SYSRES and the procedure library of another 
system residence file en SYS002. 



3. A private core image library and the 
core image library of a system 
residence file on SYS002. 

4. Two private core image libraries. 

You roust ascertain that the receiving 
system has the ability to execute the 
phase(s) being copied. 

Relocatable Library 

Selected modules, or the entire library, 
can be transferred (in either direction) 
between: 



MERGE Considerations 

File definitions (through DLBL and EXTENT 
statements) must be made before the MERGE 
control statement is used. When defining 
files, remember: 

1. When merging to, cr from, a modified or 
duplicate system residence file, the 
modified or duplicate file name must be 
IJSYSRS, the logical unit must be 
SYS002, and the file ID must be 
identical to the ID supplied when the 
file was created. 
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When merging to a private relocatable 
library file, the file name must be 
IJSYSRL, the logical unit must be 
SYSRLB, and the file ID must be 
identical to the ID supplied when the 
file was created. 

When merging from a private relocatable 
library file, the file name must be 
IJSYSPR, the logical unit must be 
SYS001, and the file ID must be 
identical to the ID supplied when the 
file was created. 

When merging to a private source 
statement library file, the file name 
must be IJSYSSL, the logical unit must 
be SYSSLB, and the file ID must be 
identical to the ID supplied when the 
file was created. 

When merging from a private source 
statement library file, the file name 
must be IJSYSPS,, the logical unit must 
be SYS000 and the file ID must be 
identical to the ID supplied when the 
file was created. 



6. When merging tc a private cere image 
library file, the file name must be 
IJSYSCI, the logical unit must be 
SYSCLE, and the file ID must be 
identical to the ID supplied when the 
file was created. 

7. When merging from a private core image 
library file, the file name must be 
IJSYSFC, the logical unit must be 
SYS003 and the file ID must be 
identical to the ID supplied when the 
file was created. 



Figure 3 4 shows the file name, logical 
unit, and direction cf transfer fcr each of 
the MERGE operations. Any combination of 
the indicated operations can be performed 
in one jcb step. 

Diagnostic messages fcr erroneous 
assignments, file definitions, etc, are 
provided on SYSLST. Figure 35 is an 
example cf a job set up tc use the MERGE 
function. 



r t 

File Name | IJSYSRS 
Logical Unit |SYSRES 
I- + 



-4 



% 
• 



IJSYSRS 
SYS002 



IJSYSRL 
SYSRLB 



IJSYSPR 
SYS001 



IJSYSSL 
SYSSLE 



IJSYSPS 
SYS000 



IJSYSCL 
SYSCLE 



IJSYSPC 
SYS0C3 
j 



Merge RES to NRS | from 

I 

Merge NRS to RES | to 

I 

Merge RES to PRV | from 

I 
Merge NRS to PRV | 

I 

Merge PRV to RES | to 

I 

Merge PRV to NRS | 

I 

Merge PRV to PRV | 

x 



tc 
from 

from 

tc 



to 
to 



to 



from 
f rem 
f rem 



tc 
tc 



tc 



tc 

tc 



from 
from 
from 



tc 



f rem 
from 
f rem 



> 



Figure 34. Direction of Transfer for Merge Operations 
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Assume two disk drives with addresses cf 190 and 191. 

// JOE EXAMPLE 

// ASSGN SYSRLB,X'191' 

// ASSGN SYSSLB,X'191' 

// ASSGN SYS003,X'191 , 

// ASSGN SYS0OO,X'190' 

// ASSGN SYS001,X'190' 

// ASSGN SYS002,X'191' 

Note 1. // DLEL I JSYSRL,' PRIVATE RL ' , 99/365 
•— // EXTENT SYSRLB, 111111,1,0,1500,100 

Note 2 // DLBL I JSYSSL, 'PRIVATE SL', 99/365 
I— // EXTENT SYSSLE, 111111, 1,0,1600,100 

Note 3 // DLBL IJSYSPC,' PRIVATE CIL', 99/365 
L- // EXTENT SYS003, 111111, 1,0, 1700, 100 

Note 4 // DLBL I JSYSPR, 'PRIVATE RL TEST 1 , 99/365 
I— // EXTENT SYS001, 111111,1, 0,1300, 100 

Note 5 // DLBL IJSYSPS, 'PRIVATE SL TEST' ,99/365 
I— // EXTENT SYSOO0,llllll, 1,0, 1400, 100 

Note 6 // DLBL I JSYSRS, 'SYSTEM RESIDENCE ', 99/365 
L- // EXTENT SYS002, 111111, 1,0,1,179 



( 







// 


EXEC CORGZ 


r~ 






NEWVOL RL=10(2),SL=10(2) ,CL=10(15) 


Note 


7 




COPYR 


ALL 


L 






COPYS 


ALL 






COPYC 


ALL 


i — 






MERGE 


PRV,PRV 


Note 


8 




COPYR 


ALL 


• — 






COPYS 


ALL 


r~ 






MERGE 


NRS,PRV 


Note 


9 




COPYR 


ALL 


i 




/* 


COPYS 


ALL 






// 


ASSGN 


SYS003,X'190' 






// 


ASSGN 


SYS002,X'191' 



Note 10 // DLBL IJSYSCL, 'PRIVATE CIL', 99/365 

<— // EXTENT SYSCLE, 111111,1, 0,1700, 100 

Note 11 ASSGN SYSCLB,X'191' 

Note 12 // DLBL IJSYSPC, 'PRIVATE CL TEST', 99/365 

L~ // EXTENT SYS003, 111111,1, 0,1500,100 

Note 13 // DLBL I JSYSRS, 'SYSTEM RESIDENCE' , 99/365 

«— // EXTENT SYS002, 111111, 1,0,1,179 

// EXEC CORGZ 

Note 14 MERGE PRV,PRV 
L_ COPYC ALL 

Note 15 MERGE NRS,PRV 
l— COPYC ALL 

/& 



Figure 35. Example of Job Set Up to Use the MERGE Function (Part 1 of 2) 



( 
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Note 1; File definition statements for a private relocatable 
library file to be created and updated. 

Note 2: File definition statements for a private source statement 
library file to be created and updated. 

Note 3: File definition statements for a private core image 
library file to be created. 

Note U ; File definition statements for a private relocatable 
library file from which modules to be copied. 

Note 5 ; File definition statements for a private source statement 
library file from which books are to be copied. 

Note 6: File definition statements for a modified, or duplicate 

system residence file from which modules and books are tc 
be copied. 

Note 7: Creates private core image, relocatable, and source 

statement libraries on SYS003, SYSRLB, and SYSSLB, and 
copies the core image, relocatable, and source statement 
libraries from the system residence file on SYSRES into 
them. 

Note 8; Merges all modules and books frcm private relocatable and 
source statement libraries on SYS001 and SYS000 into the 
appropriate private libraries created on SYSRLB and 
SYSSLB. 

Note 9: Merges all modules and books from the relocatable and 
source statement libraries of a modified, or duplicate 
system residence file en SYS002 into private libraries 
created on SYSRLB and SYSSLB. 

Note 10: File definition statements for the private core image 
library file just created and to be updated. 

Note 11 ; In order to merge to the private core image library just 
created, assign it to SYSCLB. The from file must be 
assigned to SYS003 and is a previously created private 
core image library. See MERGE Conside rations for 
additional information. 

Note 1 2; File definition statements for a private cere image 
library from which phases are to be copied. 

Note 1 3 : File definition statements for a modified, or duplicate 
system residence file from which the phases of the core 
image library are to be copied. 

Note 1U; Merges all phases from the private core image library on 
SYS003 into the newly created private core image library 
on SYSCLB. 

Note 15 : Merges all phases from the core image library of a 

modified, or duplicate system residence file on SYS002 
into the newly created private core image library on 
SYSCLB. 



Figure 35. Example of Job Set Up to Use the MERGE Function 
(Part 2 of 2) 
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SERVICE PROGRAMS 



This section describes the control 
statements that can be submitted to one of 
the programs that service the libraries. 
There are six service programs: 

• DSERV -- to display the directories of 

each of the libraries. 

• CSERV -- to display and/or punch phases 

from the core image library. 

• RSERV — to display and/or punch modules 

from the relocatable library. 

• SSERV -- to display and/cr punch bocks 

from the source statement 
library. 

• ESERV -- to de-edit, display and/or 

punch, verify, and update 
edited assembler macros frcm 
the source statement library. 

• PSERV -- to display and/cr punch 

procedures from the procedure 
library. 



system library. To display the system 
library, the corresponding private library 
must be unassigned. 



The printed output cf DSERV contains the 
status report of the system libraries and 
any assigned private libraries followed by 
the specified directory. Each printed 
directory is preceded by a header that 
contains the name of the directory in 
EBCDIC characters. All fields are headed 
by the title DEC (decimal) or HEX 
(hexadecimal). Generally, each page 
includes up to 96 di-rectory entries printed 
in double-column format with 48 entries per 
column. However, the core image directory 
contains mere information and is therefore 
printed in single column format with up to 
48 entries per page. The additional 
information in the printout of the core 
image directory in response to a DSPLY(S) 
request indicates: 



1. If the phase is SVA-eligible 



2. If the phase is listed in the SDL 



The following symbolic units must be 
assigned to perform service functions on a 
private library: SYSCLB for a private core 
image library, SYSRLB for a private 
relocatable library, and SYSSLB for a 
private source statement library. A 
private library must be unassigned to 
perform service functions en the 
corresponding system library. 



DSERV, DIRECTORY SERVICE 

This section describes the display of the 
directories. • The copy function for the 
directories is discussed in the section 
Copy Program . 

The format of the display depends upon 
the operation specified in the DSERV 
control statement (s) . 

Multiple displays of the same directory, 
either sorted or unsorted, may be obtained 
in the same job step. To do this, use a 
separate control statement for each desired 
display. 



Operati onal characteristics 

If any private library is assigned, it is 
displayed in place of the corresponding 



3. If the phase is contained in the SVA 



4. Entry names contained in the SDL that 
have been established for future use, 
but do not as yet have phases attached 
to them. These entry names are listed 
as contained in the SDL only. 



ESERV can be executed in any partition with 
the statement: 

// EXEC DSERV 



Except for a display of the core image 
directory, DSERV may require additional 
storage beyond the minimum of 64K available 
to the partition if a sorted display is 
specified. If the partition is not large 
enough to contain all the entries to be 
sorted, sorting is dene in mere than one 
pass, resulting in more than one sorted 
list of entries. If this is net 
satisfactory, increase the partition size. 

If DSERV is to run in real mode, the 
REAL parameter must be included in the EXEC 
statement. 

SYSLOG must not be assigned to a printer 
and SYSIN and SYSLST must be assigned. 
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DSERV Control Statements 

The control statements for DSERV are: 



j DSPLY 
j DSPLYS 



directory [, directory] 
[ (phasename(,nnl )] 



Name 

Name field must be blank. 

Operation 



DSPLY Displays the directory entries in 
the sequence that they appear in 
the directory. 

DSPLYS Displays the directory entries 
sorted alphamerically. 

The entries in the core image directory are 
always displayed in alphameric sequence 
(DSPLY CD and DSPLYS CD give the same 
result) . 



Directory: Can be one of the following: 

| TD $-phases in the core image directory. 

CD The core image directory 

RD The relocatable directory 

SD The source statement directory 

PD The procedure directory 

ALL All the above (TD, CD, RD, SD, and 
PD) are specified. 

Note: If CD (without any other operands) 
or ALL is specified, the version and 
modification level of CD entries is not 
displayed. 

Phasename: If CD is specified, then the 
version and modification level of any 
single phase or group of phases can be 
displayed by using phasename. Specify the 
phasename desired. If it contains less 
than eight characters, the specification 
should either be padded out with blanks 
(COBOL ) or one blank should be included 
immediately after the last character of the 
phasename (COBOL ). In the example, COBOL, 
if many phases contain the first five 
characters, COBOL, then to display the 
version and modification level cf all cf 
these phases specify (COBOL) without any 
blanks. 

nn: Specify (in decimal) the displacement 
into the phase where the location of the 
version and modification level is for cne 
of the following: 



• A version and modification level in the 
nonstandard position. 

• The version and modification level of 
the phase (s) specified is higher than 
that of the DSERV in use. 

If nn is net specified, the program assumes 
12 bytes fcr IBM-supplied transients and 8 
bytes for all other entries. 

Notes: 

1. Only one phase or group of phases can 
be specified per CD control statement. 
If more than one is specified, then the 
last specification is the only one 
processed. 

2. Continuation cards are not valid. 

3. A blank operand or nc control statement 
results in a system status report cnly. 

4. The output of the core image directory 
also indicates if a phase is 
SVfl-eligible, if it has an entry in the 
SDL (system directcry list) , and if it 
has been loaded in the SVA. 



CSERV, CORE IMAGE LIBRARY 

To request a service function for the core 
image library (either system or private) , 
use the following EXEC ccrtrcl statement: 

// EXEC CSERV 

One or more of the three service functions 
can be requested within a single run. 
Punched output is sequenced in columns 77 
through 80. The first card punched for 
each phase is sequenced zero. Any number 
of phases within the core image library can 
be acted upon in this run. 



Display, 

The display function produces a printout of 
a phase in the core image litrary. 

The printed output produced by the 
display function consists of a header and 
the phase. The printed header contains the 
phase name and the length of the phase in 
number of bytes. 

The printed output cf the phase contains 
a three-byte hexadecimal load address of 
the first fcyte in the line, followed by 48 
bytes of text displayed in hexadecimal. 

If the phase is relocatable, relocation 
information is printed following the text 
information. 
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The DSPLY control statement in one of 
the following formats is used to display 
phases in the core image library. 

DSPLY phasel[,phase2, . . . ] 

DSPLY progl.ALL[,prog2.ALL, ] 

DSPLY ALL 

The first format is used if only specific 
phases are to be displayed. The entry in 
the operation field is DSPLY. phase in the 
operand field represents the name cf the 
phase to be displayed. If more than one 
phase is to be displayed, the phase names 
are separated by commas. Phase names must 
be from one to eight characters long. 

The second format is used when an entire 
program is to be displayed. The entry in 
the operation field is DSPLY. In the 
operand field, prog refers tc the first 
four characters of the phase names making 
up a program. (All phases of a multiphase 
program should have the same first four 
characters.) The four characters are 
folic ?ed by a period and ALL. 

The third format is used if the entire 
core image library is to be displayed. The 
ent y in the operation field is DSPLY. The 
entry in the operand field is ALL. 

It is possible to use all three types of 
operands together in a single control 
statement. 

For the display function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette. SYSLOG must 
not be assigned to a printer. 

Punch 

The punch function converts a phase in the 
core image library into punched-cards or 
into a card-image format. 

Any number of phases in the core image 
library can be punched within a single run 
unless SYSPCH is assigned to a disk or tape 
unit, or to a 3540 diskette (for subsequent 
use as SYSIPT to a link edit job step). In 
this case a maximum of 120 phases can be 
punched. The punched-card output is 
acceptable as input to the linkage editor 
for recataloging to the core image library. 
When non-relocatable phases are 
recataloged, they are loaded in a partition 
at the same address as when they were 
originally link-edited because their 
address(es) are absolute. Relocatable 
phases, however, are loaded at an address 
relative to the end of the supervisor (S + 
displacement) . 



The following cards are contained in the 
phase decks punched frcm the cere image 
library. 

1. PHASE card: contains the phase name 
and the beginning load address. If the 
phase that is punched is SVA-eligible, 
that is, if it has been cataloged as 
such, the SVA parameter is also punched 
in the PHASE card. 

2. ESD card: SD type, contains the phase 
name, the length of the phase, and the 
beginning load address. 

3. TXT cards: contain the loading address 
cf the first byte in the card, the 
number of bytes of text punched in the 
card (usually 56, except fcr the last 
card) , the identification number of the 
control section (always 0001) 
containing the text, and the actual 
text. 

4. END card: contains the transfer 
address, and signifies the end of the 
phase. 

If the phase is relocatable, RLD cards are 
also punched. These cards contain 
information that identifies these portions 
of the TXT cards that may need to be 
modified by the relocating leader. 

To facilitate recatalcging of the 
phase(s), a /* card will be the last card 
cf any punched output cf a CSERV job step. 
If SYSIPT and SYSPCH are assigned to the 
same card read punch, the end-of-file 
indicator (/*) from SYSIPT is selected to 
stacker 2 . 

The PUNCH control statement in one of 
the following formats is used to convert 
phases in the core image library to 
punched-card output. 

PUNCH phaselt,phase2,. ..] 

PUNCH prcgl.ALL[,prog2.ALL, . .. ] 

PUNCH ALL 

The first format is used if enly specific 
phases are to be punched. The entry in the 
operation field is PUNCH. The entry in the 
operand field, pha se, represents the name 
cf the phase to be punched. If mere than 
one phase is to be punched, the phase names 
are separated by commas. Phase names must 
be from one to eight characters long. 

The secend format is used when an entire 
program is to be punched. The entry in the 
operation field is PUNCH. In the operand 
field, prog refers to the first four 
characters of the phase names making up a 
program. (All phases cf a multiphase 
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program should have the same first four 
characters.) The four characters are 
followed by a period and ALL. 

The third format is used if the entire 
core image library is to be punched. The 
entry in the operation field is PUNCH. The 
entry in the operand field is ALL. 

when SYSPCH is assigned to a tape or 
disk unit, each card image is preceded by a 
stacker- select character. 

For the punch function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSPCH must 
be assigned to a card punch, a tape unit, 
or a disk unit. SYSLST must be assigned tc 
a printer, a tape unit, a disk unit, or a 
3540 diskette, SYSLOG must net be assigned 
to a printer. 

Whenever the same card read punch is 
assigned to SYSIN and also tc SYSPCH, 
enough blank cards for punching the module 
must follow each PUNCH control statement. 
This prevents erroneously punching the 
cards of a following job step. Extra cards 
are automatically bypassed. 



Display and Punch 

The display-and-punch function combines the 
separate operations of the display and the 
punch functions. 

The DSPCH control statement is used to 
convert phases in the core image library tc 
printed and punched-card output. The DSPCH 
control statement is in one of the 
following formats. 

DSPCH phasel[,phase2, . . .] 

DSPCH progl.ALLt ,prog2.ALL, . . . ] 

DSPCH ALL 



same first four characters.) The four 
characters are followed ty a period and 
ALL. 

The third format is used if the entire 
cere irrage library is to be displayed and 
punched. The entry in the operation field 
is DSPCH. The entry in the operand field 
is ALL. 

When SYSPCH is assigned tc a tape or 
disk unit, each card image is preceded by a 
stacker-select character. 

For the display and punch function, 
SYSIN irust be assigned tc a card reader, a 
tape unit, a disk unit, or a 354 diskette. 
SYSLST must be assigned tc a printer, a 
tape unit, or a disk unit. SYSPCH must be 
assigned tc a card punch, a tape unit, a 
disk unit, or a 3540 diskette. SYSLOG must 
net fce assigned tc a printer. 

Whenever the same card read punch is 
assigned to SYSIN and also tc SYSPCH, 
enough blank cards for punching the module 
must fcllcw each DSPCH ccntrcl statement. 
This prevents erroneously punching the 
cards cf a following jet step. Extra cards 
are automatically bypassed. • 



RSERV, RELOCATABLE LIERARY 

Tc request a service function for the 
relocatable library, use the following EXEC 
control statement: 

// EXEC RSERV 

Cne cr mere cf the three service functions 
can be requested within a single run. Any 
number of modules within the relccatable 
library can be acted upon in this run. 
Punched output is sequenced in columns 77 
through 80. The first card punched for 
each module is sequenced zero. 



) 



The first format is used if only specific 
phases are to be displayed and punched. 
The entry in the operation field is DSPCH. 
The entry in the operand field, phase , 
represents the name of the phase tc be 
displayed and punched. If more than one 
phase is to be displayed and punched, the 
phase names are separated by commas. Phase 
names must be from one to eight characters 
long. 

The second format is used when an entire 
program is to be displayed and punched. 
The entry in the operation field is DSPCH. 
In the operand field, pro g refers to the 
first four characters of the names of the 
phases making up the program. (All phases 
of a multiphase program should have the 



Display 

The display function produces a printout cf 
a module in the relocatable library. 

The printed output produced by the 
display function consists cf a header and 
the module. 

Contained in the printed header is the 
ircdule name and the number cf records 
needed to contain the module. 

The printed output of the module is 
represented by hexadecimal characters and 
EECDIC, depending on the type of record and 
the information contained within the 
record. 
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The DSPLY control statement in cne cf 
the following formats is used to display 
modules in the relocatable library. 

DSPLY modulel[,module2, . . . ] 

DSPLY prog 1. ALL [, prog 2. ALL,. .. ] 

DSPLY ALL 

The first format is used if cnly specific 
modules are to be displayed. The entry in 
the operation field is DSPLY. module in 
the operand field represents the name cf 
the module to be displayed. If more than 
one module is to be displayed, the module 
names are separated by commas. Module 
names must be from one to eight characters 
long. 

The second format is used when an entire 
program is to be displayed. The entry in 
the operation field is DSPLY. In the 
operand field, prog refers tc the first 
three characters of the modules used to 
build the program. (All IBM-supplied 
modules in the relocatable library making 
up a program have the same first three 
characters, such as IJQ for the assembler 
and IJS for COBOL.) The three characters 
are followed by a period and ALL. 

The third format is used if the entire 
relocatable library is to be displayed. 
The entry in the operation field is DSPLY. 
The entry in the operand field is ALL. 

For the display function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette. SYSLOG must 
not be assigned to a printer. 



Punch 

The punch function converts a module in the 
relocatable library into a punched-card 
output check. 

The PUNCH control statement in cne cf 
the following formats is used to convert 
modules in the relocatable library to 
punched-card output. 

PUNCH modulelt ,module2, ] 

PUNCH progl.ALLt,prog2.ALL,. .. ] 

PUNCH ALL 

The first format is used if only specific 
modules are to be punched. The entry in 
the operation field is PUNCH. The entry in 
the operand field, module, represents the 
name of the module to be punched. If more 
than one module is to be punched, the 



mcdule names are separated by ccmmas. 
Module names must be from one to eight 
characters long. 



( 



The second format is 
program is to be punched 
operation field is PUNCH 
field, prog refers to th 
characters of the module 
program. (All IBM-suppl 
relocatable library maki 
have the same first thre 
as IJQ for the assembler 
fcr COBOL.) The three c 
followed by a period and 



used when an entire 
The entry in the 
In the operand 
e first three 
s used tc build the 
ied modules in the 
ng up a program 
e characters, such 

and ILA and ILG 
haracters are 

ALL. 



The third format is used if the entire 
relocatable library is tc be punched. The 
entry in the operation field is PUNCH. The 
entry in the operand field is ALL. 

When SYSPCH is assigned tc a tape or 
disk unit, each card image is preceded by a 
stacker-select character. 

Fcr the punch function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSPCH must 
be assigned to a card punch, a tape unit, 
cr a disk unit. SYSLST must be assigned to 
a printer, a tape unit, a disk unit, or a 
3540 diskette, and SYSLOG must net be 
assigned to a printer. 

Whenever the same card read punch is 
assigned tc SYSIN and alsc tc SYSPCH, 
enough blank cards for punching the module 
must fcllcw each PUNCH ccntrcl statement. 
This prevents erroneously punching the 
cards cf a following jcb step. Extra cards 
are autcmatically bypassed. 

Display and Punch 

The display-and-punch functicn ccmbines the 
separate operations of the display and the 
punch functions. 

The DSFCH control statement is used to 
convert mcdules in the relocatable library 
to printed and punched-card cutput. The 
ESPCH control statement is in cne cf the 
following formats. 

DSPCH modulel[,module2,. . .] 

DSPCH prcgl.ALL[,prog2.ALL, . .. ] 

ESPCH ALL 

The first format is used if cnly specific 
mcdules are to be displayed and punched. 
The entry in the cperaticn field is DSPCH. 
The entry in the operand field, mc dul e, 
represents the name cf the mcdule to be 
displayed and punched. If mere than one 
mcdule is tc be displayed and punched, the 
mcdule names are separated by ccirmas. 



( 
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Module names must be from one to eight 
characters long. 

The second format is used when an entire 
program is to be displayed and punched. 
The entry in the operation field is DSPCH. 
In the operand field, pro g refers to the 
first three characters of the modules used 
to build the program. (All IBM-supplied 
modules in the relocatable library making 
up a program have the same first three 
characters, such as IJQ for the assembler 
and ILA and ILG for COBOL.) The three 
characters are followed by a period and 
ALL. 

The third format is used if the entire 
relocatable library is to be displayed and 
punched. The entry in the operation field 
is DSPCH. The entry in the operand field 
is ALL. 

When SYSPCH is assigned to a tape or 
disk unit, or a 3540 diskette, each card 
image is preceded by a stacker-select 
character. 

For the display and punch function, 
SYSIN must be assigned to a card reader, a 
tape unit, a disk unit, or a 3540 diskette. 
SYSLST must be assigned to a printer, a 
tape unit, a disk unit, or a 3540 diskette. 
SYSPCH must be assigned to a card punch, a 
tape unit, or a disk unit. SYSLOG must not 
be assigned to a printer. 

Whenever the same card read punch is 
assigned to SYSIN and also tc SYSPCH, 
enough blank cards for punching the module 
must follow each DSPCH control statement. 
This prevents erroneously punching the 
cards of a following job step. Extra cards 
are automatically bypassed. 



SSERV, SOURCE STATEMENT LIBRARY 

To request a service function for the 
source statement library, use the following 
job control statement: 

// EXEC SSERV 

One or more cf the three service functions 
can be requested within a single run. Any 
number of books within the source statement 
library can be acted upon in this run. 



The DSPLY control statement in one cf 
the following formats is used to display 
becks in the source statement library. 



DSPLY sublib.bookl [,sublib.bcok2, . . . ] 

ESPLY sublibl.ALL[,sublib2.ALL,. ..] 

ESPLY ALL 

The first format is used if enly specific 
becks are to be displayed. The entry in 
the operation field is DSPLY. The 
qualifier sublib in the operand field 
represents the sublibrary containing the 
beck tc be displayed and can be any 
alphameric character (0-9, A-Z, #, $, and 
a) , representing source statement 
sublibraries. 

bco k in the operand field represents the 
name of the book in the sublibrary to be 
displayed. If more than one beck is tc be 
displayed, the entries must be separated by 
cciriras. If books to be displayed are in 
the same sublibrary, subsequent beck names 
need not be qualified. (The librarian 
assumes that nonqualified becks are in the 
last sublibrary specified. If a sublibrary 
is never specified, the librarian assumes 
the book is in the assembler sublibrary.) 
The names cf the books in the operand field 
can be from one to eight characters in 
length. Ccntinuation statements are not 
recognized. 

The second format is used if an entire 
sublibrary is to be displayed. The entry 
in the operation field is DSPLY. The first 
entry in the operand field is the name of 
the sublibrary to be displayed. The 
qualifier sublib can be any alphameric 
character (0-9, A-Z, #, $, and a), 
representing source statement sublibraries. 

The su blib qualifier is required. If 
emitted, the operand is flagged as invalid 
and no processing is done on the 
sublibrary. 

The second entry in the operand field is 
ALL. The two entries must be separated by 
a pericd. 

The third format is used if the entire 
source statement library is to be 
displayed. The entry in the operation 
field is DSPLY. The entry in the operand 
field is ALL. 



Displ ay 



The display function produces a printout of For the display function, SYSIN must be 

a book in the source statement library. assigned tc a card reader, a tape unit, a 

| disk unit, or a 3540 diskette. SYSLST must 

Eooks are displayed in the card image be assigned tc a printer, a tape unit, a 

format. Each book is preceded and followed I disk unit, or a 3540 diskette. SYSLOG must 

JD statement. ' net 1 



by a BKEND 



be assigned tc a printer. 
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Punch 

The punch function converts a book in the 
source statement library intc punched cards 
or into card-image format. 



The PUNCH control statement in cne cf 
the following formats is used to convert 
books in the source statement library to 
punched-card output. 

PUNCH sub.bookl[,sub.book2, . .. ] [,CMPRSD] 

PUNCH SUbl . ALL [ , sub2 . ALL, . . . ] [ , CMPRSD] 

PUNCH ALL [, CMPRSD] 

The first format is used if only specific 
books are to be punched. The entry in the 
operation field is PUNCH. The qualifier 
sub in the operand field represents the 
sublibrary containing the beck to be 
punched and can be alphameric character 
(0-9, A-Z, #, $, and a), representing 
source statement sublibraries. 

book in the operand field represents the 
name of the book in the sublibrary to be 
punched. The entry CMPRSD is used if the 
books are to be punched in the compressed 
form in which they are stored in the 
library. When this option is elected, the 
cards are punched in the first seventy-one 
columns. If more than one bcok is to be 
punched, the entries must be separated by 
commas. If books to be punched are in the 
same sublibrary, subsequent book names need 
not be qualified. (The librarian assumes 
that nonqualified books are in the last 
sublibrary specified. If a sublibrary is 
never specified, the librarian assumes the 
book is in the assembler sublibrary.) The 
names of the books in the operand field can 
be from one to eight characters long. 
Continuation statements are not recognized. 

The second format is used if an entire 
sublibrary is to be punched. The entry in 
the operation field is PUNCH. The first 
entry in the operand field is the name of 
the sublibrary to be punched. The 
qualifier sub can be any alphameric 
character (0-9, A-Z, #, $, and a), 
representing source statement sublibraries. 

The sublib qualifier is required. If 
omitted, the operand is flagged as invalid 
and no processing is done on the 
sublibrary. 

The second entry in the operand field is 
ALL. The entry CMPRSD is used if the books 
are to be punched in the compressed format. 
A /* statement is always punched at the end 
of the output. When SYSPCH is assigned to 
a tape unit or disk unit, each card image 
is preceded by a stacker-select character. 



The third format is 
source statement libra 
The entry in the opera 
The entry in the opera 
entry CMPRSD is used i 
punched in the compres 
CMPRSD is specified, p 
sequenced in columns 7 
punched for each modul 
compressed source code 
sequence numbers. A / 
punched at the end of 



used if the entire 
ry is to be punched, 
tion field is PUNCH, 
nd field is ALL. The 
f the becks are to be 
sed format. If. 
unched output is 
7-80. The first card 
e is zero. The 

retains its original 
* statement is always 
the cutput . 



For the punch function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSPCH must 
be assigned to a card punch, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, or a 
disk unit, and SYSLOG must net be assigned 
to a printer. 

Whenever the same card read punch is 
assigned tc SYSRDR and also to SYSPCH, 
enough blank cards for punching the book 
must fcllcw each PUNCH ccntrcl statement. 
This prevents erroneously punching the 
cards cf a following jcb step. Extra cards 
are automatically bypassed. 

Display and Punch 

The display-and-punch function combines the 
separate operations of the display function 
and the punch function. 

The DSPCH control statement in cne cf 
the following formats is used to convert 
becks in the source statement library to 
printed and punched-card cutput. 

DSPCH sub.booklt,sub.book2, . . . ] [, CMPRSD] 

DSPCH SUbl.ALL[sub2.ALL, . . . ] t, CMPRSD] 

DSPCH ALL [, CMPRSD] 

The first format is used if enly specific 
becks are tc be displayed and punched. The 
entry in the operation field is DSPCH. The 
gualifier sub in the operand field 
represents the sublibrary containing the 
beck tc be displayed and punched and can be 
any alphameric character (0-9, A-Z, #, $, 
and a) , representing source statement 
sublibraries. 



book 
name of 
displaye 
used if 
compress 
original 
cne bock 
the entr 
If becks 
the same 
need net 



in the operand field represents the 
the book in the sublibrary to be 
d and punched. The entry CMPRSD is 
the books are to be punched in the 
ed format, but printed in the 
card image format. If more than 
is tc be displayed and punched, 
ies must be separated by commas, 
tc be displayed and punched are in 
sublibrary, subsequent beck names 
be qualified. (The librarian 
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assumes that nonqualified books are in the 
last sublibrary specified. If a sublibrary 
is never specified, the librarian assumes 
the book is in the assembler sublibrary.) 
The names of the books in the operand field 
can be from one to eight characters long. 
Continuation statements are not recognized. 
A /* statement is punched at the end of the 
output. 

The second format is used if an entire 
sublibrary is to be displayed and punched. 
The entry in the operation field is DSPCH. 
The first entry in the operand field is the 
name of the sublibrary to be displayed and 
punched. The qualifier sub can be any 
alphameric character (0-9, A-Z, #, $, and 
a), representing source statement 
sublibraries. 

The subjLib qualifier is required. If 
omitted, the operand is flagged as invalid 
and no processing is done on the 
sublibrary. 

The second entry in the operand field is 
ALL. The entry CMPRSD is used if the books 
are to be punched in the compressed format. 
When SYSPCH is assigned to a tape or disk 
unit, each card image is preceded by a 
stacker-select character. 

The third format is used if the entire 
source statement library is to be displayed 
and punched. The entry in the operation 
field is DSPCH. The entry in the operand 
field is ALL. The entry CMPRSD is used if 
the books are to be punched in the 
compressed format. 



To request a service or maintenance 
function for edited assembler macros in the 
E sublibrary, specify: 

// EXEC ESERV 



Input to ESERV is read frcir SYSIPT. The 
first card after the // EXEC ESERV 
statement should be GENEND or GENCATALS. 
If neither is present, GENCATALS is 
assumed. These cards, as shewn below, must 
not start in column 1. 



bGENENDb no operands 



This causes ESERV to place an 
END and a /* card immediately 
after the de-edited macro on 
SYSPCH so that it can be used as 
SYSIPT for the assembler. 



bGENCATALSb no operands 



This causes a CATALS statement 
of the form A book to precede 
and a /* card to follow each 
macro so that the resulting 
SYSPCH stream can be used as 
SYSIPT input tc the MAINT 
program for cataloging the 
de-edited macros into the A 
sublibrary. 



Display and Punch Functions 



For the display and punch function, 
SYSIN must be assigned to a card reader, a 
tape unit, a disk unit, or a 3540 diskette. 
SYSLST must be assigned to a printer, a 
tape unit, a disk unit. SYSPCH must be 
assigned to a card punch, a tape unit, a 
disk unit, or a 3540 diskette. SYSLOG must 
not be assigned to a printer. 



Whenever the same card read punch is 
assigned to SYSIN and also to SYSPCH, 
enough blank cards for punching the book 
must follow each DSPCH control statement. 
This prevents erroneously punching the 
cards of a following job step. Extra cards 
are automatically bypassed. 



The following functions can be performed 
for one or more edited macros within a 
single ESERV run. 

1. DSPLY De-edits and displays macro (s) on 

SYSLST. 

2. PUNCH De-edits and punches macro (s) on 

SYSPCH. 

3. DSPCH Combines 1 and 2. 



The control statements must not start in 
column 1 and have the following format: 



sublib.bookl [ ,sublib.bcck2. . . ] 




ESERV, SOURCE STATEMENT LIBRARY 



The DOS/VS assembler uses two sublibraries 
of the source statement library: the macro 
(E) sublibrary and the copy (A) sublibrary. 



If the qualifier sublib is omitted, the E 
sublibrary is assumed. If the de-edited 
macro is tc be updated, the appropriate 
control statements must follow immediately, 
(See 4-10 telcw.) 
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Ver if ication and Update Functions 

These functions can be performed for a 
single de- edited macro or the last 
de-edited macro in an ESERV run. 

4. COL Defines location and length of 

sequence number field. 

5. VER Verifies contents of a specific 

statement. 

6. ADD Adds statement (s) at a specified 

point. 

7. DEL Deletes specified statements. 

8. REP Replaces specified statement (s) . 

9. END Indicates last update statement. 

10. RST Indicates that sequence number 

restart a lower number than a 
number contained in a specified 
preceding statement of the macro 
definition. 

These control statements can be used to 
verify and/or update properly identified 
statements in an edited macro definition. 

Verifying and Updating Macro Definitions 

Statements are identified either by the 
sequence number in the identification field 
or by their position relative to a previous 
statement that has a sequence number as 
follows: 

seq-no[+rel] 



If the COL statement is omitted, the 
default is: 

) COL 73,6 



VER S T ATE MENT : causes a specific source 
statement to be verified against the 
contents of the statement following the VER 
statement en SYSIPT. Its format is: 

) VER seq-no[+rel] ,len 

len is the length cf the field tc be 
verified. It is a decimal number 
with a value- of freir 1 tc 80. Only 
the first le n characters are 
compared. If the strings dc net 
match, an error message is given. 

ADD STATEMENT: adds statements tc a source 
macro definition. Its format is: 



) 



ADD seq-not+rel] 



The source statements following the ADD 
statement are added to the macro definition 
after the indicated statement number. 

DEL STATEMENT: deletes one cr more 
statements from a iracrc source definition. 
Its format is: 



) 



DEL seq-no[+rel] [ ,seq-nc[+rel]] 



The statement number indicates the first 
and last in the series to be deleted. Only 
the first number is required tc delete one 
statement. 



seq-no 



rel 



sequence number of a source 
statement, 1 to 8 decimal digits in 
length, as specified in the COL 
statement. 

positive decimal number, 1 to 4 
digits in length, representing the 
position of the desired statement 
relative to the sequence numbered 
statements. 



COL STATEMENT: specifies the location of 
the sequence number in the macro 
definition. If present, this statement 
must immediately follow the DSPLY, PUNCH or 
DSPCH statement to which it applies. The 
format is: 



) 



COL startcol,x 



started is a decimal number from 73 to 80 
which gives the starting position 
of the sequence number. 

x is a decimal number from 1 to 8 

giving the length of the sequence 
number. 



R EP STATE MENT: replaces one or more 
statements in a source macro definition 
with one cr more new statements. Its 
format is: 



) 



REP seq-no[+rel] [ , seq-not+rel] ] 



The source statement (s) following the REP 
statement replace the statement cr series 
of statements identified by the REP 
statement. 



RST STATEMENT: indicates to ESERV that the 
sequence numbers of the macro definition 
restart at a lower number after the 
statement indicated by the RST statement. 
The format is: 



) 



RST seq-no[+rel] 



Not e: If an ADD, DEL or REP operation is 
performed en the last statement in a 
sequence number series, then the first 
statement in the new series must be 
referenced in the RST statement. See 
example 3. 
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END STA TEMENT: indicates the end of the 
update statements on SYSIPT. Its format 
is: 



) 



END 



This statement is required for every 
updating run. 

Gener al Rules for Update Control Statement s 



1. 



2. 



Right parenthesis in column 1 and at 
least one blank before and after 
operation code. 

Any seq-no[+rel] must specify a source | 

statement after the previous 

seq-no [+rel] , except that: | 

a. The two numbers specified in a DEL 
or REP statement may be equal; 



b. the REP, DEL, ADD, or RST statement 
may reference the same statement as I 
the immediately preceding VER 
statement. 

3. Any seq-no must be greater than or 

equal to either the last seq-no in the 
previous statement or the first seq-no 
in the same statement. 

Exception: The first seq-no in the 
control statement following the RST 
statement is independent of the seq-no 
in the RST statement. 

Error Handling During Update 

The following errors will cause 
cancellation of the update run. 

1. Invalid operands in the COL statement. 

2. The COL statement is not the first 
update control statement. 

3. The macro is completely de-edited 
without all update control statements 
having been processed. 

4. Invalid operands in the RST statement. 

In all other cases, an error message is 
printed. Updating continues with the next 
control statement, if possible. De-editing 
of the macro will always be completed. 



The above coding shows five macros being 
de-edited in the same run. The resulting 
listings and/or decks could be used for 
future updates. Note that the last macro 
de-edited (MAC5) could also have been 
updated in this run. All are taken from 
the macro sublibrary, since E.iracname is 
the default. 



Example 2: De-editing with U pdating 

// JOB SAMPLE 
// EXEC ESERV 

GENEND 

DSPCH E.MAC1 
) COL 77,4 
) VER 72+1,5 
.PP99 
) ADD 72+1 

AIF UPCH NE 1400). D4 
) DEL 102,103+3 
) REP 245+4,260 
NITA CLC 0(4,REG6),ELANKS 

BE RETRY 6 
LYNDA CLC 4 (4 , REG6) , BLANKS 

BE RETRY7 
) END 
/* 
/& 

This example produces a listing en SYSLST 
and a deck with an END and /* on SYSPCH of 
the de-edited and updated macro named MAC1 
The resulting SYSPCH file (if en tape or 
disk) could thus be reassigned as SYSIPT 
for imirediate editing by the DOS/VS 
assembler with EDECK specified in the 
option card. 

In addition, the resulting updated 
edited macro deck could then, in another 
step, be cataloged to the E sublibrary via 
MAINT. 

Example 3: Restarting 

Sequence number in the macro to be updated: 

0001 
0003 
0004 
0005 
0002 
0004 
0006 
0007 
0008 



Example_lj_ De-editing Without Updating 

// JOB SAMPL1 
// EXEC ESERV 

PUNCH E. MAC 1, MAC 2 

DSPLY MAC3 

DSPCH E.MAC 4, E.MAC 5 
/* 
/S 



Sample update statements: 



// 


EXEC ESERV 


) 


COL 77,4 


) 


DEL 5 


) 


RST 5+1 


) 


ADD 4 




B NEXT! 


) 


END 
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In this example, GENCATALS is assumed. 
Since statement 5 (the last in a series) 
to be deleted, the RST statement must 
reference one past the statement being 
deleted. 



PSERV, PROCEDURE LIBRARY 



To request a service function for the 
procedure library, use the following EXEC 
control statement: 

// EXEC PSERV 

One or more of the three service functions 
can be requested within a single run. Any 
number of procedures within the procedure 
library can be acted upon in this run. 



Statement Format: 



Display 



The statement used to display procedures is 
DSPLY. 



Statement Format: 



DSPLY procedurename t , procedurename, . . . ] 
DSPLY ALL 



procedurename specifies the name of the 
procedure to be displayed. 
If more than one procedure is 
to be displayed, the names 
are separated by commas. 
Procedure names are from one 
to eight alphameric charac- 
ters, the first of which must 
be alphabetic or a $. 



ALL 



specifies that the entire 
procedure library is to be 
displayed. 



For the display function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, a 
disk unit, or a 3540 diskette. SYSLOG must 
not be assigned to a printer. 



Punch 



The control statement used to punch a 
procedure is PUNCH. 



I PUNCH procedurename [, procedurename, . . .] 
PUNCH ALL 



procedurename represents the name of the 

procedure to be punched. If 
more than one procedure is to 
be punched, the names are 
separated by ccrrmas. The 
procedure name is from one to 
eight alphameric characters, 
the first of which must be 
alphabetic cr a $. 



ALL 



specifies that the entire 
procedure library is to be 
punched. 



When SYSPCH is assigned tc a tape or disk 
unit, each card image is preceded by a 
stacker-select character. 

For the punch function, SYSIN must be 
assigned to a card reader, a tape unit, a 
disk unit, or a 3540 diskette. SYSPCH must 
be assigned to a card punch, a tape unit, a 
disk unit, or a 3540 diskette. SYSLST must 
be assigned to a printer, a tape unit, or a 
disk unit, and SYSLOG must not be assigned 
to a printer. 

Whenever the same card read punch is 
assigned tc SYSIN and also tc SYSPCH, 
enough blank cards fcr punching the module 
must follow each PUNCH control statement. 
This prevents erroneously punching the 
cards of a following job step. Extra cards 
are automatically bypassed. 

The punched-card output is acceptable to 
every function that uses procedure input. 
Each procedure punched is preceded by a 
CATALP statement. The last card punched is 
the /* statement. 



Display and Pu nch 

The control statement used tc print and 
punch procedures is DSPCH. 



Stateme nt Format : 

DSPCH procedurename [ , procedurename, . . . ] 
DSPCH ALL 



procedurename represents the name of the 

procedure tc be displayed and 
punched. If more than one 
procedure is tc be displayed 
and punched, the names are 
separated by ccmiras. Module 
names are from one to eight 
alphameric characters, the 
first of which roust be 
alphabetic or a $. 
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) 



ALL 



specifies that the entire 
procedure library is to be 
printed and punched. 



When SYSPCH is assigned to a tape cr disk 
unit, or a 354 diskette, each card image 
is preceded by a stacker-select character. 



For the display and punch function, 
SYSIN must be assigned to a card reader, a 
tape unit, a disk unit, or a 3540 diskette, 
SYSLST must must be assigned to a printer, 
a tape unit, a disk unit, or a 3540 



diskette. SYSPCH must be assigned to a 
card punch, a tape unit, cr a disk unit. 
SYSLOG must not be assigned to a printer. 

Whenever the same card read punch is 
assigned tc SYSIN and alsc tc SYSPCH, 
enough blank cards for punching the 
procedure must follow each DSPCH control 
statement. This prevents erroneously 
punching the cards of a fcllcwing job step 
Extra cards are automatically bypassed. 

The last card punched by CSPCH is a /* 
statement. 



> 
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r t t T" 

| Function | Unit | Element | 

I" 



Control Statements 



Catalog 



Compile/ 
Assemble 
and 
Catalog 



Core Image 
Library 



Relocatable 
Library 



Source 

Statement 

Library 



Procedure 
Library 



Relocatable 
Library 



Phase 



Module 



Book 



Proced. 



Module 



// OPTION CATA1 

(Linkage Editor control statements and if in card 

form, the phase tc te cataloged) 
/* 
// EXEC LNKEDT 



// EXEC MAINT 

CATALR rrcdulenairet , v, ir] 
(module to be cataloged) 



// EXEC MAINT 

CATALS sublib.booknamet, v.mt,C] ] 
(beck tc be cataloged) 



// EXEC MAINT 

CATALP prccedurenarret ,VM=v.m] t,EOF=yy] l~,DATA=NO ] 

L YESJ 

(procedure to be cataloged) 
/+ (or delimiter as specified in EOP parameter) 



Us ing a ta pe fi le for SYSPCH/SYSIPT with temporary 
assignments . 

// ASSGN SYSPCH, X'cuu* 

CATALR rrcdulenairet, v.ir] 

PHASE name, origin [ ,NCAUTO] 
// EXEC COEOL 

(source deck) 
/* 

// MTC WTM, SYSPCH, 2 
// MTC REW, SYSPCH 
// ASSGN SYSIPT, X'CUU' 
// EXEC MAINT 
/S 

To compile/assemble more than one program and catalog 
all of them into the relocatable library, use the same 
setup except that the ccrrpilaticn/asserrbly ccntrcl cards 
(CATALR through /* inclusive) for each program fellow 
the /* of the preceding program. The MTC statements 
through /S follow the /* of the last program. This 
facility is not available for RPG and FL/I compilations 
or for IBM 2314 or IBM 2319 applications. 



Using a DASD file for SYSPCH/SYSIPT, 
perma nent ass ignment. ) 



(Must always be a 



// 
// 



// 

/* 

// 
// 

// 
/& 



DLBL Ealance of information 
EXTENT reguired fcr SYSPCH file 
ASSGN SYSPCH, X'CUU' 
CATALR modulename[, v.rr] 
PHASE name,crigin[ ,NCAUTO] 
EXEC COEOL 
(source deck) 

CLOSE SYSPCH, X '000' 

DLBL Balance of information 

EXTENT required fcr SYSIPT file 

ASSGN SYSIPT, X'cuu' 

EXEC MAINT 



( 



Figure 36. Maintenance Functions, Example (Part 1 of 3) 



( 
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r t t T" 

| Function | Unit | Element | 
l . + + + . 



Control Statements 



H 



The 'file-ID* in the DLBL statements must te the same in 
both sets. To compile/assemble more than one program 
and catalog all of their into the relocatable library, 
use the same setup except that the compilation/assembly 
control cards (CATALR through /* inclusive) for each 
program follow the /* of the preceding program. CLOSE 
through /£ follow the /* of the last program. 



Delete 



Core Image 
Library 



Phase 



// EXEC MAINT 

DELETC phaselt , phase2, . . . ] 



Program 



// EXEC MAINT 

DELETC progl.ALLt ,prcg2.ALL, ] 



Relocatable 
Library 



Module 



// EXEC MAINT 

DELETR modulel[,mcdule2, . . . ] 



Program 



// EXEC MAINT 

DELETR progl.ALLt ,prcg2. ALL, ... ] 



Library 



// EXEC MAINT 
DELETR ALL 



Source 

Statement 

Library 



Book 



// EXEC MAINT 

DELETS sublib.bcokl[ ,sublib.book2, . . .] 



Sub- 
library 



// EXEC MAINT 

DELETS sublib. ALL 



Library 



// EXEC MAINT 
DELETS ALL 



Procedure 
Library 



Proced. 



// EXEC MAINT 

DELETP procedurenarcel [ , procedur ename2 , . . . ] 



Library 



// EXEC MAINT 
DELETP ALL 



Rename 



Core Image 
Library 



Phase 



// EXEC MAINT 

RENAMC oldname, newnamet , oldname, newname, . . . ] 



Relocatable 
Library 



Module 



// EXEC MAINT 

RENAMR oldname, newname[, oldname, newname, . . . ] 



Source 

Statement 

Library 



Book 



// EXEC MAINT 

RENAMS sublib . oldname , sublib . newname [ , sublib . 
oldname , sublib. newnaire, . . . ] 



Procedure 
Library 



Proced. 



// EXEC MAINT 

RENAMP oldname, newnaire [ ,oldnaire, newnaire . . . . ] 



Update 



Source 

Statement 

Library 



Book 



// EXEC MAINT 

UPDATE sublib. booknaire, [s.bookl] , [v.ir] , Inn] 
) ADD, ) DEL, or ) REP statements as required 

with source statements to be added 
) END [v.mt,C]] 



Figure 36. Maintenance Functions, Example (Part 2 of 3) 
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r t t T" 

| Function | Unit | Element) 



Control Statements 



f 

| Condense 


-+ 

| Core Image 
j Library 


-4 +■ 

| Library | 

j. ± 


// 


EXEC MAINT 
CONDS CL 




| Relocatable j Library j 
| Library j j 

L ± ± 


// 
// 


JOB jobname 
EXEC MAINT 
CONDS RL 




| Source 
j Statement 
j Library 


T T 

| Library | 

L _ J.. 


// 


EXEC MAINT 
CONDS SL 


L_ 


j Procedure 
| Library 
. i 


T T 

| Library | 
_ j. i 


// 


EXEC MAINT 
CONDS PL 


r 

L 


T 

| Libraries 

.4. 


T T 

jAll | 

L_ i 


// 


EXEC MAINT 

CONDS CL,RL,SL,PL 


r — 

|Set 

| Paramete] 

|for 

j Automatic 

| Condense 


T 

| Libraries 

_j. 


-+ r 

|Any or | 
|A11 | 

j. i 


// EXEC MAINT 

CONDL lib=nnnnn [ , lib=rnnnn, . . . ] 

Notes: Values to be substitued for lib*. 


L . 




CL — Core image library 

PL — Procedure Library 

RL -- Relocatable library 

SL — Source statement library 

Values to be substitued for nnnnn: 

One to five decimal digits, with a 
maximum value cf 65536. 


r 

|Reallo- 
j cation 


T 

| System 


T T 

| Library | 


// DLBL IJSYSRS,'DOS SYSTEM RESIDENCE FILE* date, code 
// EXTENT SYSRES, balance of extent information 
// EXEC MAINT 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

Notes: The library identifiers are as follows: 

CL — Core image library 

PL — Procedure Library 

RL — Relocatable library 

SL — Source statement library 

Values to be substitued for cylin and tracks: 
any integer. 



Note: // JOB, /*, and /6 must be included where needed. 
Figure 36. Maintenance Function, Example (Part 3 of 3) 
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r t 

| Display Unit | Element 



Control Statements 



Core Image 
Library 



Phase 



Program 



Library 



Directory 



Phases (s) with 
Version and 
Modification Level 



-4 



Phase(s) with 
Version and 
Modification Level 



// EXEC CSERV 

DSPLY phasel t ,phase2, . . . ] 



// EXEC CSERV 

DSPLY prcgl,ALL[ ,prog2.ALL, . .. ] 



// EXEC CSERV 
DSPLY ALL 



// EXEC DSERV 

DSPLY CD cr DSPLYS CD 



In the stan da r d position : 



// EXEC DSERV 

DSPLYtS] CD (phasenaire) or CD (pfcasenaire) 



In the nonstan dard position or h igher than D S ERV in 
use: 



// EXEC DSERV 

DSPLYtS] CD (phasenaire,nn) or CD (phasenaire, nn) 



Relocatable 
Library 



Module 



Directory 



// EXEC RSERV 

DSPLY rrcdulelt ,ircdule2, ] 



Program 


4 

|// EXEC RSERV 

| DSPLY prcgl. ALLt .prog2.ALL, . . . ] 
4- - - 


Library 


T 

|// EXEC RSERV 
| DSPLY ALL 

4 



// EXEC DSERV 

DSPLY RD cr DSPLYS RD 



Source 

Statement 

Library 



Book 



Sublibrary 



Library 



Directory 



// EXEC SSERV 

DSpLY sublib.bccklt.sublib.bcck2, ] 



// EXEC SSERV 

DSPLY sublibl.ALL [,sublib2. ALL, . . . ] 



// EXEC SSERV 
DSPLY ALL 



// EXEC DSERV 

DSPLY SD or DSPLYS SD 



Procedure 
Library 



Procedure 



Library 



Directory 



// EXEC PSERV 

DSpLY prccedur enamel [ , procedur enaire2 , 



.] 



// EXEC PSERV 
DSPLY ALL 



// EXEC DSERV 

DSPLY PD or DSPLYS PD 



Figure 37. Service Functions, Example (Part 1 cf 3) 
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Punch Unit j Element 



h 



Control Statements 



< 



Transient 
Directory 



Directory 



// 



EXEC DSERV 

DSPLY TD or ESPLYS TD 



System 
Directory 



Directory 



// EXEC DSERV 



Directories 



All 



// 



EXEC DSERV 

DSPLY ALL cr DSPLYS ALL 



Core Image 
Library 



Phase 



Program 



Library 



// EXEC CSERV 

PUNCH phasel[,,phase2 f . .. ] 



// EXEC CSERV 

PUNCH prcgl.ALLE ,prog2.ALL, ] 



// 



EXEC CSERV 
PUNCH ALL 



Relocatable 
Library 



Module 



Program 



Library 



// EXEC RSERV 

PUNCH mcdulelt ,mcdule2, ] 



// EXEC RSERV 

PUNCH prcgl.ALL[.prcg2.ALL, ] 



// 



EXEC RSERV 
PUNCH ALL 



Source 

Statement 

Library 



Eook 



Sublibrary 



Library 



+- 



// EXEC SSERV 

PUNCH sublib.bcoklt,sublib.bcck2, . . . ] £,Ciy:PRSD] 



// EXEC SSERV 

PUNCH sublibl.ALL[,sublib2.ALL,. ..] [,CMPRSD] 



// EXEC SSERV 

PUNCH ALL t , CMPRSD ] 



Procedure 
Library 



Procedure 



Library 



// EXEC PSERV 

PUNCH procedurenamel [ , procedurenaire2 , 



.] 



// 



EXEC PSERV 
PUNCH ALL 



Figure 37. Service Functions, Example (Part 2 of 3) 
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Display and 
Punch Unit 



| Element 



Control Statements 



Core Image 
Library 



j Phase 



j. 

| Program 



Library 



// EXEC CSERV 

BSPCH phasel[,phase2, . . . ] 



// EXEC CSERV 

DSPCH prcgl.ALL[ ,r.rcg2.ALL, . . . ] 



// 



EXEC CSERV 
DSPCH ALL 



Relocatable 
Library 



| Module 



j. 

| Program 



I- 

| Library 



-+ 

| Book 



// EXEC RSERV 

DSPCH mcdulelt ,mcdule2, . . . ] 



// EXEC RSERV 

DSPCH prcgl.ALLl ,prcg2.ALL, . -. ] 



// 



EXEC RSERV 
DSPCH ALL 



Source 

Statement 

Library 



j. 

| Sublibrary 



h- 



Library 



// EXEC SSERV 

DSPCH sublifc.bcckl[,sublib.bcck2, . . . ] [,CMPRSD] 



// EXEC SSERV 

DSPCH sublibl. ALLt ,sublib2.ALL, ] [,CMPRSD] 



// EXEC SSERV 

DSPCH ALLCCMPRSD] 



Procedure 
Library 



Procedure 



Library 



// EXEC PSERV 

DSPCH prccedurenamel[ ,prccedurename2 , 



. ] 



// 



EXEC PSERV 
DSPCH ALL 



Note: // JOE, /*, and /& must be included where needed, 



Figure 37. Service Functions, Example (Part 3 cf 3) 
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I Co PY Unit j Element 
I" 



Control Statements 



Core Image 
Library 



Phase 



Program 



Library 



// ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS/VS SYSTEM RESIDENCE 

FILE' , date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CCRGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

COPYC phasel[,phase2, . . . ] 



// ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS/VS SYSTEM RESIDENCE 

FILE ' , date, cede 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

COPYC progl.ALL[,prog2.ALL,. .. ] 



// ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS,' DOS/VS SYSTEM RESIDENCE 

FILE ' , date, cede 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) r PL=cylin (tracks) 

COPYC ALL 



Relocatable 
Library 



Module 



Program 



Library 



// ASSGN SYS002,X*cuu* 

// DLBL IJSYSRS, 'DOS/VS SYSTEM RESIDENCE 

FILE* , date, cede 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

COPYR modulel[ ,rrodule2,. . . ] 



// ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS/VS SYSTEM RESIDENCE 

FILE', date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

COPYR prcgl.ALLf ,prog2. ALL , . .. ] 



// ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS/VS SYSTEM RESIDENCE 

FILE' , date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

COPYR ALL 



Figure 38. Copy Function, Example (Part 1 cf 5) 
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I Copy Unit 
I- 



Element 



Control Statements 



Source 

Statement 

Library 



Book 



Sublibrary 



Library 



// ASSGN SYS002,X'cuu' 

// CLBL IJSYSRSj'DOS/VS SYSTEM RESIDENCE 

FILE' , date, cede 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin (tracks) f RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

COPYS sublib.bookl [ , sublib.bcck2 , . . . ] 



// ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS,'DOS/VS SYSTEM RESIDENCE 

FILE* , date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) , PL=cylin (tracks) 

COPYS sublibl. ALL [ ,sublib2.ALL, . . . ] 



//ASSGN SYS002,X"cuu' 

// DLBL IJSYSRS,'DOS/VS SYSTEM RESIDENCE 

FILE' , date, code 
// EXTENT SYS002, balance cf extent information 
// EXEC CCRGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

COPYS ALL 



Procedure 
Library 



Procedure 



Library 



// ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS,'DOS/VS SYSTEM RESIDENCE 

FILE' , date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

COPYP rrccedurenairel [ , procedurename2 , . . . ] 



// 
// 



// 
// 



ASSGN SYS002,X'cuu' 

DLBL IJSYSRS, 'DOS/VS SYSTEM RESIDENCE 

FILE ' , date, cede 

EXTENT SYS002, balance of extent information 

EXEC CCRGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 

SL=cylin (tracks) ,PL=cylin (tracks) 
COPYP ALL 



Libraries 



All 



// ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DCS/VS SYSTEM RESIDENCE 

FILE' , date, cede 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin (tracks) ,RL=cylin (tracks) , 
SL=cylin (tracks) ,PL=cylin (tracks) 

COPY ALL 



Figure 38. COPY Function, Example (Part 2 of 5) 
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I Copy Unit j Element 



Ccntrol Statements 



Definition 
of a 
Private 
Library 
(Note 2) 



Core 
Image 



Relocatable 



Source statement 



// ASSGN SYS003,X'cuu' 

// DLBL 'lJSYSPC, , user identification of 

private library* , date, code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

NEWVOL CL=cylin (tracks) 



// ASSGN SYSRLB,X'cuu' 

// DLBL IJSYSRL, 'user identification of private 

library * , date, code 
// EXTENT SYSRLE, balance of extent information 
// EXEC CORGZ 

NEWVOL RL=cylin (tracks) 



// ASSGN SYSSLB,X*cuu' 

//DLBL IJSYSSL, 'user identification of private 

library' , date, code 
// EXTENT SYSSLE, balance of extent information 
// EXEC CORGZ 

NEWVOL SL=cylin (tracks) 



Definition 
and 

Creation of 
a Private 
Library 
(Note 2) 



Core 
Image 



// ASSGN SYS003,X'cuu' 

// DLBL IJSYSPC, 'user identification of 

private library' , date, code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

NEWVOL CL=cylin (tracks) 

COPYC operands 



Relocatable 



// ASSGN SYSRLB,X'CUU' 

// DLBL IJSYSRL, 'user identification of private 

library' ,date f code 
// EXTENT SYSRLB, balance of extent information 
// EXEC CORGZ 

NEWVOL RL=cylin( tracks) 

COPYR operands 



Source Statement 



// ASSGN SYSSLB,X'CUU' 

// DLBL IJSYSSL, 'user identification cf private 

library' , date, code 
// EXTENT SYSSLE, balance of extent information 
// EXEC CORGZ 

NEWVOL SL=cylin (tracks) 

COPYS operands 



Merge System 
Residence to 
New System 
Residence 



// ASSGN (statements as required) 

// DLBL IJSYSRS,'NEW SYSTEM RESIDENCE ', date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

MERGE RES,NRS 

COPY statements (CCPYC, COPYR, COPYS, COFYP, 

COPYI) as required 



Merge New 
System 
Residence 
to System 
Residence 



// ASSGN (statements as required) 

// DLBL IJSYSRS,'NEW SYSTEM RESIDENCE ', date , code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

MERGE NRS,RES 

COPY statements (CCPYI, COPYC, CCFYR, COPYS, 

COPYP) as required 



Figure 38. Copy Function, Example (Part 3 of 5) 
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I I Copy Unit j Element 
| h + 



Control Statement 



Merge System 
Residence 
to Private 
Libraries 



// ASSGN (statements as required) 

// DLEL IJSYSRL,' PRIVATE RELOCATAELE 

LIBRARY ' , date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL IJSYSSL, 'PRIVATE SOURCE STATEMENT 

LIBRARY' ,date, code 
// EXTENT SYSSLE, balance of extent information 
// DLBL IJSYSCL, 'PRIVATE CORE IMAGE 

LIBRARY' .date, code 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLE,X'cuu' 
// EXEC CORGZ 

MERGE RES,PRV 

COPY statements (CCPYI, COPYR, CCFYS, COPYC) 

required 



as 



Merge New 
System 
Residence 
to Private 
Libraries 



-+ 



// ASSGN (statements as required) 

// DLBL IJSYSRS,'NEW SYSTEM RESIDENCE ', date , code 
// EXTENT SYS002, balance of extent information 
// DLBL IJSYSRL,' PRIVATE RELOCATABLE 

LIBRARY' , date, code 
// EXTENT SYSRLB, balance of infcriraticn 
// DLBL IJSYSSL, 'PRIVATE SOURCE STATEMENT 

LIBRARY' , date, cede 
// EXTENT SYSSLE, balance of extent information 
// DLBL IJSYSCL, 'PRIVATE CORE IMAGE 

LIBRARY' , date, cede 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLE,X'CUU" 
// EXEC CORGZ 

MERGE NRS,PRV 

COPY statements (CCPYR, COPYS, CCFYC) as required 



Merge 
Private 
Libraries 
to System 
Residence 



// ASSGN (statements as required) 

// DLBL IJSYSPR,' PRIVATE RELOCATAELE 

LIERARY' , date, cede 
// EXTENT SYS001, balance of extent information 
// DLBL I JSYSPS, 'PRIVATE SOURCE STATEMENT 

LIBRARY' , date, cede 
// EXTENT SYS000, balance of extent information 
// DLEL IJSVSEC, 'PRIVATE CORE IMAGE 

LIBRARY' , date, code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

MERGE PRV,RES 

COPY statements (CCPYR, COPYS, CCPYC) as required 



Figure 3i 



Copy Function, Example (Part 4 cf 5) 
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I Copy Unit 



Element 



Control Statement 



Merge 
Private 
Libraries to 
New System 
Residence 



// ASSGN (stateme 
// DLBL IJSYSRS, ' 
// EXTENT SYS 00 2, 
// DLBL IJSYSPR,' 

LIBRARY' , date, 
// EXTENT SYS001, 
// DLBL IJSYSPS,' 

LIBRARY' ,date, 
// EXTENT SYS000, 
// DLBL IJSVSPC,' 

LIBRARY' , date, 
// EXTENT SYS 00 3, 
// EXEC CORGZ 

MERGE PRV,NRS 

COPY statement 



nts as required) 

NEW SYSTEM RESIDENCE' , date , code 

balance of extent information 

PRIVATE RELOCATABLE 

code 

balance of extent information 

PRIVATE SOURCE STATEMENT 

code 

balance of extent information 

PRIVATE CORE IMAGE 

code 

balance of extent information 



s (CCPYR, COPYS, CCFYC) as required 



Merge 
Private 
Libraries 
to Private 
Libraries 



// ASSGN (statements as required) 

// DLBL IJSYSRL,'NEW PRIVATE RELOCATABLE 

LIBRARY' , date, code 
// EXTENT SYSRLE, balance of extent information 
// DLBL IJSYSPR, 'EXISTING PRIVATE RELOCATABLE 

LIBRARY ' , date, code 
// EXTENT SYS001, balance of extent information 
// DLBL IJSYSSL,'NEW PRIVATE SOURCE STATEMENT 

LIBRARY' M date, code 
// EXTENT SYSSLE, balance of extent information 
// DLBL IJSYSPS, 'EXISTING PRIVATE SOURCE STATEMENT 

LIBRARY ' , date , code 
// EXTENT SYS000, balance of extent information 
// DLBL IJSYSCL,'NEW PRIVATE CORE IMAGE 

LIBRARY ' , date, code 
// EXTENT S^SCLB, balance of extent information 
ASSGN SYSCLE,X'CUU' 
// DLBL IJSYSPC, 'EXISTING PRIVATE CCRE IMAGE 

LIBRARY' , date, code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

MERGE PRV,PRV 

COPY statements (CCPYR, COPYS, CCFYC) as required 

To defi ne the private library in the same jcb step, 



precede MERGE with a NEWVOL statement, except for 



COPYC statements. 



Notes; 

1. // JOB, /* , and /S must be included where needed. 

2. The private library can be updated with either a MAINT or a copy MERGE function. 

Figure 38. Copy Function, Example (Part 5 of 5) 



162 DOS/VS System Control Statements 



SYSTEM BUFFER LOAD (SYSBUFLD) 



SYSBUFLD is a special service program that 
loads the UCE (Universal Character Set 
Buffer) and the FCB (Forms Control Buffer) 
for the 3203, 3211, and 5203 printers with 
buffer load phases. For a 5203 without the 
universal character set (UCS) feature, only 
the FCB is loaded. To load the UCE of the 
printers, the corresponding buffer load 
phases must reside in the cere image 
library with valid phase names. SYSBUFLD 
is self-relocating and requires 2K of 
storage for its operation. 

SYSBUFLD is executed in your job stream 
when it is necessary to change the contents 
of either the UCB or the FCB. This program 
is distinct from job control and is 
initiated by the statement: 

// EXEC SYSBUFLD 

SYSBUFLD then reads a control card from 
SYSIPT, which identifies the unit and the 
type of buffer load to be performed. The 
format of this card for the FCB is: 

FCB SYSxxxt ,phasename] 

The format of the card for the UCE is: 

UCB SYSxxx [,phasename] 
[ 1# FOLD] [,NOCHK] 
[,NULMSG] 

Note: For each of these formats, a name in 
the name field must not be used. 



Operation 

The operation defines the type of buffer 
load to be performed. 



FCB operation loa 
core image library o 
SYSIPT following the 
into the FCB in the 
EBCDIC characters of 
correspond to the li 
single form. The ma 
per form is 192 for 
112 for 5203. When 
issued to the printe 
initiated. A charac 
command is compared 
FCE. When a match o 
is terminated. Thus 
printer to many vari 



ds either a phase in a 
r an FCB card load (on 

SYSBUFLD control card) 
control unit. The 

the FCE load 
nes of printing for any 
ximum number of lines 
3203, 180 for 3211, and 
a form-skip command is 
r, forms movement is 
ter of the form-skip 
to the character in the 
ccurs, forms movement 
, the FCE can adapt the 
able forms. 



the print positions en the printer trains. 
A character sent to the printer for 
printing is matched against the character 
in the UCE. When a match occurs, the 
corresponding train character is printed in 
the Printline position that the cutput 
character occupied. Thus, with the use of 
SYSEUFLD and the trains available, the 
printers can be adapted tc many printing 
applications. 

The following standard UCE load phases 
are supplied in the cere image library: 

r t t 1 

| Printer | Phase Name | Train Type | 

y. x x -l 

| 3203 | $$BUCE3 | AN | 
J. + + .J 

| 3211 | $$BUCE | All | 

^ 4 + .j 

| 5203 | $$BUCE5 | LC j 
L X X J 

Additional UCB loads (including a copy of 
the standard one) are supplied in the 
relocatable library: 

r t t 1 

| Printer | Module Name | Train Type | 



H- 


3203 


-_X-_ 


IJBTRAN 

IJBTRGN 

IJBTRPAN 

IJBTRPHN 

IJBTRPN 

IJBTRQNC 

IJBTRQN 

IJBTRRN 

IJBTRSN 

IJBTRTN 

IJBTRYN 

IJBTRALA 


-4— 


(an 
|gn 

PCS-AN 

PCS-HN 

PN 

QNC 

QN 

RN 

SN 

TN 

YN 

ALA 


L 




- X- 




. x 




L 


3211 


_ x 


IJBTRAll 
IJBTRGll 
IJBTRHll 
IJBTRPll 
IJBTRTll 


. x 


All 
Gil 
Hll 
Pll 
Til 


r 


5203 


T 


IJBTRLC 
IJBTRGN 
IJBTRPN 
IJBTRHN 


T 


LC 
GN 
PN 
HN 



UCB operation loads the phase from a 
core image library into the UCE in the 
control unit. The UCB load corresponds to 



i x x J 

The additional UCB leads must te cataloged 
to a core image library before their 
execution. They can be assigned any valid 
phasename. For dualing feature support 
during IPL, develop your own buffer and 
catalog it into the cere image library with 
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the phasename $$BUCB. (Refer to the 
publication IBM 3211/3216/3811 Component 
Description and Operating Procedures , 
GA24-3543, for further inforiration on the 
dualing capability). 

It is your responsibility to: 

• Assemble, link-edit, and catalog any FCE 
load phases into the core iirage library 
and 

• Link-edit and catalog any IEM-supplied 
UCSB load phases or assemble, link-edit, 
and catalog any user-written UCE load 
phases into the core image library, and 

• Mount the new train before the UCB is 
loaded. 



en SYSxxx after the buffer is leaded. If 
NULMSG is not specified after the FCB or 
UCB has keen loaded, the program skips to 
channel 1, issues a print of the last 80 
characters in the phase, and again skips to 
channel 1. This is repeated for each 
message. 

NULMSG is optional and only valid for UCB. 

This message could identify the phase 
that was leaded. During a UCB lead, the 
train of the printer could be identified by 
printing a unique character cf the train in 
the message. This would ensure that the 
mounted train of the printer is compatible 
with the contents of the UCB. 



Hew to Use SYSBUFLD 



( 



Operands 
SYSxxx 

I The name of the logical unit assigned to a 
3203, 3211, or 5203 printer to be loaded is 
SYSxxx. It must be SYSLST, SYSLOG, or a 
programmer logical unit. 

Note: If SYSLOG is specified in the 
SYSBUFLD control statement, it must be 
| assigned to a 3203, 3211, or 5203. 

phasename 

The core image name of the phase containing 
the applicable buffer load. If FCE is 
specified and phasename is emitted, an FCB 
card load from SYSIPT is assumed. 

FOLD 

FOLD signifies that the UCSB buffer is to 
be loaded with the folding operation code 
to permit printing of uppercase fcr 
lowercase bit configurations. FOLD is 
optional and only valid for UCB. 

NOCHK 

NOCHK prevents the data checks that are 
generated by the printer because of 
Printline character mismatches with the 
UCSE. NOCHK is optional and only valid for 
UCB. 

NULMSG 

NULMSG signifies that the 80-character 
verification message is not to be printed 



I The UCE phase format fcr the 3211 



432-character 
UCB load 



80-character 
field (see 
Use r Written 
UCB Load 
Phase) 



8C-character 
verification 
message 



The UCE phase format fcr the 3203 and 5203 
is: 



240-character 
UCE load 



80-character 
verification 
message 



The FCB phase format for the 3203, 3211, 
and 5203 is: 



nnn -character 
FCB load 



80-character 
verification 
message 



where nnn = 192 for 3203 
180 fcr 3211 
112 for 5203 

Note: Other than $$EFCB (3211), $$BFCE3 
(3203), and $$BFCB5 (5203), which are 
leaded by IPL) , no additional FCE loads are 
supplied by IBM. 

The FCE card format is: 

FCE load 

(maximum of 112, 180, or 192 bytes) 

The verification message is net allowed. 
Figure 3 9 contains examples cf FCE card 
leads fcr the 3211. 



< 
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^ 

/ 



Cols. 1 8 11 



20 



29 35 



45 



"TIT I I I I 

Card 11 2 3 4 

Card 2 5 

Card 3 C X 

* EXAMPLE OF FCB CARD LOAD 6 LPI , 180 LINES FEB PAGE 

Card 1*1 2 3 4 

Card 2 5 

Card 3 C X 

* EXAMPLE OF FCB CARE LOAD 8 LPI, 180 LINES PER PAGE. (NOTE: * IN 

* COLUMN 1 OF CARD 1.) 

Card 1 *C 1 X 

* EXAMPLE OF FCB CARD LOAD FOR PRINTING 8 LPI. CHANNEL 1 IS THE FIRST 
LINE AFTER THE PAGE PERFORATION. IT IS NECESSARY TO KEEP THE FCB 
SYNCHRONIZED WITH THE FORM; HOWEVER, IT IS NOT NECCESSARY TO 
INITIALLY ALIGN THE FIRST LINE OF THE PAGE WITH THE FIRST POSITION 
OF THE FCB. THIS EXAMPLE IS FOR A FORM WITH 2 LINES PER PAGE WITH 
PRINTING ON 14 LINES. 



65 80 

I I 



Figure 39. FCE Card Load Examples for 3211 Printer 



The FCB characters for phase and card 
f orirat are : 



SYSIPT, an X must te used to indicate the 
end of the buffer. 



Phase 

Channel Format 

Indication (in Hex) 

Null (Space) 00 

Channel 1 01 

Channel 2 02 

Channel 3 03 

Channel 4 04 

Channel 5 05 

Channel 6 06 

Channel 7 07 

Channel 8 08 

Channel 9 09 

Channel 10 0A 

Channel 11 0B 

Channel 12 0C 

End of FCB In 
8 Lines per inch 1 - In 



SYSIPT 
Card Code 

blank 

1 

2 

3 

4 

5 

6 

7 



(in col. 1) 



% 

# 



1 (Applies to 3211 only. The 3203 and 5203 
have a hardware switch to indicate the 
line density. ) 

Note; Channel and End-of-Forms cannot be 
indicated in the same line for the 3203 or 
the 5203. 

When the FCB phase format is used, bit 
position 3 (the flag bit) of any channel 
indication specifies the end of the buffer 
(for example, X'lC) and, if used for a 
3211 in the first buffer position, printing 
is forced to 8 lines per inch (for example, 
X'll*). When the FCB is being loaded from 



Figure 40 is an example of how to use 
SYSEUFLD. In the example, the first job 
step of each job loads the FCB from a 
cere-image phase and the UCE . 



r 1 

|// JOE ONE 

// EXEC SYSBUFLD (load the FCB and 
FCB SYSLST,PHASE1 UCSE for FRCG001) 
UCE SYSLST, UCBPH 00 1, FOLD , NCCHK , NULMSG 
|/* 

// EXEC FROG001 
/* 
/£ 

// JOB TWO 

.// EXEC SYSBUFLD (lead the FCB and 
UCE SYSLST, UCBPH002 UCSE for PROG002) 
FCE SYSLST, PHASE2 
/* 

// EXEC PROG002 
/* 
/S 
L J 



Figure 40. Example cf System Euffer Lead 



USER-WRITTEN FCB LOAD PHASE 

Figure 41 shows how PHASE001 might be 
defined, assembled, and cataloged to the 
cere image library fcr an FCE lead. 
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// JOB FCBXMPLE 

// OPTION CATAL,DECK 

// EXEC ASSEMBLY 
PUNCH ' PHASE PHASE001,+0* 
START 

DC X'01 1 CHANNEL 1 S 1ST LINE CF PAGE * 
DC XL64 , 00' 64 LINES OF PAGE 
DC X'lC* CHANNEL 12 6 LAST LINE PAGE 
DC XL114'00' UNUSED BUFFER POSITIONS 
DC CL80*FCB PHASE 001 LOADED' MESSAGE 
END 

/* 

// EXEC LNKEDT 

/£ 



♦ Note; Channel and End-of -Fcrirs cannot be 
indicated in the same line for the 3203 or 
5203. 

Figure 41. FCB Load Program 



USER-WRITTEN UCB LOAD PHASE 



If your 3203, 3211, or 5203 uses a special 
train configuration, then you must 
assemble, link-edit, and catalog the UCB 
load phase for the special train into the 
core image library. The UCB load phase 
format for the 3211 is: 



Position 



1-432 



433-447 



448-511 



Comment 



Train image. The hexadecimal 
equivalent of all characters on 
the train. 



Zeros. 

Associative 
by the 3811 
check for i 
characters 
For a compl 
this field 
it, see IBM 
Component D 



field. This is used 
Control Unit to 
nvalid hexadecimal 
sent to the 3211. 
ete description cf 
and how to prepare 

3211/3216/3811 
escription and 



Operating Procedures, GA2 4- 354 3 . 



512 



Zero. 



513-592 Verification message (optional) . 

The UCB load phase format for the 32 03 and 
5203 is: 

Position Comment 

1-240 Train image. The hexadecimal 

equivalent of all characters on 
the train. 

241-320 Verification message (optional) . 



SYSBUFLD MESSAGES 



Appropriate messages are issued when an 
invalid parameter specification is made or 
when a required parameter is omitted. With 
the exception of an invalid phasename, all 
errors on the control card may be corrected 
through SYSLOG. An invalid phasename 
cancels the job. 



SYSBUFLD UNDER POWER 



POWER supports spooling of 3211 UCB and FCB 
load commands as given by the service 
program SYSBUFLD. 

When jcbs are executed under POWER, 
pages are formatted by posting channel 9 
and channel 12 as specified in the LINETAB 
parameter cf the * $$ PRT statement. (For 
a description of the * $$ PRT statement 
refer to the chapter POWER.) When the 
output of the job is finally printed, skip 
operations are performed according to the 
current contents of the fcrms control 
buffer. The contents of the buffer must 
therefore correspond to the specifications 
of the LINETAB parameter. 



LOADING AN FCB 

The contents of an FCE may be changed 
anywhere within a job entry. The job to 
load an FCE may also be submitted as a 
single job entry (see Submitting an FCB 
Load as a Separate Job Entry, below) . 

When a POWER writer routine prints a job 
entry that contains an FCE load (which has 
been submitted by SYSBUFLD or by any other 
program) nc check for the forms specified 
in the * $$ PRT statement is performed when 
printing is started. All records up to the 
FCE load are printed on the eld forms. 
When the FCB lead is encountered in the 
print-line image stream, the current forms 
are aligned to line 1 and the fcrms control 
buffer is subsequently leaded. (Note that 
line 1 and the channel 1 line may be 
different.) The message 

1Q8 0E JOE ENTRY name NEEDS FCRMS ffff 
FOR xxycuu 

is then issued to tell the operator that he 
has to change forms. The operator must 
place the fold of the new form en that fold 
of the old form which shows just above the 
print chain. The POWER writer routine 
enters the wait state until the operator 
reactivates the routine by a G command. 
The number 'ffff in message 1Q8CE is the 
number specified in the 'forms-number' 
parameter cf the * $$ PRT statement. If 



( 



( 
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the parameter is omitted or if the job 
entry does not contain a * $$ PRT 
statement, blanks appear instead of the 
number in the message. 

If a job entry contains more than one 
FCB load, the above described procedure is 
repeated for each FCE load, that is, the 
forms are aligned to line 1, the fcrms 
control buffer is loaded, and message 1Q80E 
is printed. The forms number given in the 
message is always the one specified in the 

* $$ PRT statement, or is blank if the 

* $$ PRT statement is omitted. The 
operator must therefore be informed which 
forms to use if more than one type of forms 
is required for a job entry. 

A job entry that loads a special buffer 
should reset the buffer to its noriral 
contents before the job entry is 
terminated. If that is not possible, the 
FCB may be reset by submitting a separate 
FCB load job entry that resets the buffer 
to normal contents. 

S ubmitt ing an FCB Load as a Separate Job 
Entry 

Submitting an FCB (or UCB) lead as a 
separate job entry allows you to execute 
that job entry, and change the contents of 
the FCB (or UCB) whenever required. Tc do 
so, submit the following job entry in any 
partition waiting for work: 

* $$ JOB FCB 

* $$ PRT Da (a is 'class' that contains no 

other job entries; it may be 
any alphabetical character) 

// JOB FCBa 

// EXEC SYSEUFLD 

FCB SYSLST, phasename 

/S 

* $$ EOJ 

After execution of this job entry, a class 
writer should be started with the command 

S PRT, cuu, ,a 

where cuu specifies the address of the 3211 
and a is 'class'. The FCB will then be 
loaded as desired. 



Since a partition is net always 
available when execution cf the FCB load 
jcb entry is required (fcr instance, when 
an FCB has to be reset tc its normal 
contents) , execute such FCB load jcb 
entries in advance and put them into 
distinct classes of the print queue. The 
FCB can then be loaded at any time by 
starting the specific class writer. If the 
class writer is stopped after the message 
1C.80E ty a 



P PRT, cuu 



command instead of reactivating it with a 



G PRT, CUU 

command the job entry which loaded the FCB 
remains in the print queue and can 
therefore be used again if required. 



LOADING A UCB 

A UCE may be loaded under control cf POWER 
by submitting the following statements 
anywhere within a jot entry: 

[// JOE] 
// EXEC SYSBUFLD 

UCE SYSLST, phasename, FOLD, NCCHK 
[/S] 

This job may also be submitted as a 
separate jcb entry. This is dene in the 
same way as described abeve for an FCB 
under Submitting an FCB Lead as a Separate 
Jcb Entry. 

A UCE load is executed as scon as it is 
encountered in the print-line image stream, 
It does not force POWER tc step printing. 
However, if the UCB load is used together 
with an FCE load, POWER steps printing to 
allow the operator to mount the required 
print train. 

Note: NCCHK must always be specified in 
the UCE card to avoid data checks in the 
print writer routine. 
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APPENDIX A: JOB CONTROL SUMMARY 



Appendix A contains a summary of the 
following: 



• Job Control Statements (JCS) which must 
be preceded by // blank in positions 1, 
2, and 3. 

• Job Control Commands (JCC). 

• Attention Routine Commands (AR) . 

The POWER statements and commands are 
summarized in Appendix C. 



Appendix A: Job Control Summary 169 



Page of GC33-5376-1, revised November 30, 1973, by TNL GN33-8767 



Operation 



Operand 



Remarks 



ALLOC 
Valid for 
JCC, AR 



F1=nK[,F2=n^[,F3=nK][F4=nK] 



Allocates foreground program areas in the virtual address 
area. Value of n is an even number F and either (inactive) 
or a minimum of 64 (active). The order of operands is 
arbitrary. At least one operand must be specified. 



ALLOCR 
Valid for 
JCC, AR 



. BGR=nK 
,F2R=nK 
= ,F4R=nK 



,FIR=nK 
:F3R=nK 



Allocates real address area among foreground and back- 
ground programs. Value of n is zero or even number. 
The order of operands is arbitrary. At least one operand 
must be specified. 



ALTER 
Valid for 
AR 



Alters 1 to 16 bytes of virtual storage, xxxxxx is the 
hexadecimal address where alteration is to start. 



["] 



ASSGN 
Valid for 
JCS, JCC 



Eoj;j3.ny_deyjce_ 

SYSxxx,( X'cuu' 

(address-list) 
(SYSyyy 
lUA 
IGN 

For_djsks 
SYSxxx,/ X'cuu' 



["temp"! 
[,permJ 



TE 



(address-list) J LPERIVH 
L SYSyyy 

Idisk 

(2311 
[2314 
3330 
k 3340 



MP|r,VOL=no][,SHR] 



Fo_r_djskettes_ 

SYSxxx, fX'cuu' 

I (address-list) 
SYSyyy 
) DISKETTE 
13540 



TtempI 

[.PERM] 



For tapes 



<x,/ X'cuu' \[x'ss']rTEMP"][vOL=no] 

I (address-list 111, A' ~ 



i SYSyyy 
TAPE 
'2400T7 
k2400T9 
(3410T7 
3410T9 
3420T7 
3420T9 



^altJI^permJ 



SYSxxx can be SYSRDR 
SYSIPT 
SYS IN 
SYSPCH 
SYSLST 
SYSOUT 
SYSLOG 
SYSLNK 
SYSREC 
SYSRLB 
SYSSLB 
SYSCLB 
SYSnnn 

X'cuu': c — 0-6 

uu = 00-FE (0-254) in hex 

address-list: a list of up to seven device 

addresses in the form 
lX'cuu',...,X'cuu') 

UA: unassign 

IGN: unassign and ignore (invalid 

for SYSCLB, SYSRDR, 
SYSIPT, and SYSIN) 

SYSyyy: any system or programmer 

logical unit 

device-class: READER, PRINTER, 

PUNCH, TAPE, DISK 
or DISKETTE 



device-type: device code of any supported 

device 



used for magnetic tape only. 





Bytes 




Translate 


Convert 


ss 


p_er jnc!l 


Paxit¥_ 


Feature_ 


Feature. 


10 


200 


odd 


off 


on 


20 


200 


even 


off 


off 


28 


200 


even 


on 


off 


30 


200 


odd 


off 


off 


38 


200 


odd 


on 


off 


50 


556 


odd 


off 


on 


60 


556 


even 


off 


off 


68 


556 


even 


on 


off 


70 


556 


odd 


off 


off 


78 


556 


odd 


on 


off 


90 


800 


odd 


off 


on 


A0 


800 


even 


off 


off 


A8 


800 


even 


on 


off 


B0 


800 


odd 


off 


off 


B8 


800 


odd 


on 


off 
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Operation 



Operand 



IASSGN continued) 

For_pn'nters 



SYSxxx,/ X'cuu' 

(address-list )\| 

SYSwv 

PRINTER 

1403 

1403U 

1443 

3203 

3211 

5203 

5203 U 



E°IJ?ard_lrjadJ.£unches 

SYSxxx,/ X'cuu' 

(address-list)! 

SYSyw 

PUNCH 

1442N1 
I1442N2 
J2520B1 
[2520B2 

2520B3 
J2540P 
12560 



,TEMP 
,PERM 



,TEMP 
PERM 



2596 
3525P 
3525RP 
5425 



m 

? 

RP 

Mi 



For card readers 



SYSxxxJ 



X'cuu' 

(address-list 

SYSyyy 

READER 

1442N1 

2501 

2520B1 

2540R 

2560 



[temp] 
I[permJ 



12596 
13504 

3505 

3525RP 

5425 



RP 



CO 800 single density 9 track tape 

CO 1 600 single density 9 track tape 

CO 1 600 dual density 9 track tape 

C8 800 dual density 9 track tape 

DO 6 250 single density 9 track tape 

DO 6250 dual density 9 track tape 



ALT: specifies alternate tape unit. 

H1 : specifies input hopper one for input on 2560 

or 5425. Is assumed if neither H1 nor H2 is 
specified. 

H2: specifies input hopper two for input on 2560 

or 5425 (invalid for programmer units and 
POWER). 

PERM: the assignment is permanent. 

TEMP: the assignment is temporary. 

VOL=no: volume serial number of the tape 
or disk required. 

SHR: indicates the share option for 

disk devices. 



BATCH 
Valid for 
AR 



'BG. 
IF1 

F2 

F3 
iF4 J 



Start, or continue processing. If specified partition was 
halted by STOP command, it is made active; same function 
as START command. 



CANCEL 
Valid for 
AR 



Cancels execution of current job in specified partition. 



CANCEL 
Valid for 
JCC 



Cancels execution of current job. 



Figure 42. Job Control Summary (Part 2 of 8) 
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Name 


Operation 


Operand 


Remarks 


["] 


CLOSE 
Valid for 
JCS, 
JCC 


SYSxxx 


,X'cuu' [,X'ss] 

,UA 

,IGN 

,ALT 




SYSxxx: for magnetic tape fQLCA£QlJC£j?I!lyl 

SYSPCH SYSIN 
SYSLST SYSRDR 
SYSOUT SYSIPT 
SYSnnn SYSPCH 

X'cuu',X'ss',UA,IGN,ALT: Values as described in ASSGN 
command. 


II 


DATE 
Valid for 
JCS 


mm/dd/yy 

or 
dd/mm/yy 


mm: month (01-12) 
dd: day (01-31) 
yy: year (00-99) 


II 


DLAB 
Valid for 
JCS 


'label fields 1-3', C 
xxxx,yyddd,yyddd, 'system codeTtype I 


'label fields 1-3': first three fields of Format 1 DASD file 

label. Is a 51-byte character string, contained 
within apostrophes and followed by a comma. 
Entire 51-byte field must be contained in the 
first of the two statements. Field 1 is the file 
name (44-byte alphameric); field 2 is the format 
identifier (1-byte numeric); field 3 is the file 
serial number (6-byte alphameric). 

C: any nonblank character in column 72. 

xxxx: volume sequence number (4-digit numeric). 
Must begin in column 16 of the continuation 
statement. Columns 1-15 are blank. 

yyddd,yyddd: file creation date followed by file expiration 
date. Each is 5-digit numeric. 

'system code': not required. When used, a 13-character string, 
within apostrophes. 

type: SD, DA, ISC, or ISE. If omitted, SD is assumed. 


II 


DLBL 
Valid for 
JCS 


fjlenameJ'file-ID'lJdate, 
[codes , [data security I 
(See Note 1 ) 


filename: one to seven alphameric characters, the first of 
which must be alphabetic. 

'file-ID': one to forty-four alphameric characters (one to 

eight alphameric characters for the 3540 diskette). 

date: one to six characters (yy/ddd for expiration date 
or yyddd for retention period). 

codes: two to four alphabetic characters. 

data security: one to three characters. 




DSPLY 
Valid for- 
AR 


xxxxxx 


Displays 16 bytes of virtual storage. 




DUMP 
Valid for 
AR 


Blank 

[ s JIbg 

I BG |[Fn 

I Fn I 
\ BGS / 
I FnS I 
[ PDAREA I 

' address.address/ 




Dumps specified areas of virtual storage. 
*Parameter causes dump on the SYSLST assigned to 
the specified partition. Default is BG SYSLST. 

blank; general registers plus all real and virtual partitions 

currently occupied by programs. 
S: general registers, all real and virtual partitions 

currently occupied by programs, and supervisor 

area. 
BG.Fn: applicable real or virtual partition currently occupied 

by program, and associated registers, n = 1 , 2, 3, or 4. 
BGS, FnS: applicable real or virtual partition currently occupied, 

registers, and supervisor area, n = 1, 2, 3, or 4. 
PDAREA: CE table, CE area, and AAA. 
address, 
address: start and end addresses of storage are to be dumped. 

Associated general registers are also dumped. 



N_ote_l: If the DLBL and EXTENT statements for a private core image library are in the input stream (that is, the information 
is not contained on the label cylinder), they must precede the ASSGN SYSCLB command. 



Figure 42. Job Control Summary (Part 3 of 8) 
172 DOS/VS System Control Statements 



Page of GC33-5376-1, revised November 30, 1973, by TNL GN33-8767 



Name 


Operation 


Operand 


Remarks 




DVCDN 


X'cuu' 


X'cuu': c = 0-6 in hex 




Valid for 




uu = 00-FE (0-2541 in hex 




JCC 








DVCUP 


X'cuu' 


X'cuu': c = 0-6 in hex 




Valid for 




uu =00-FE (0-254) in hex 




JCC 








END or ENTER 


blank 


end of SYSLOG communications 




Valid for 




END for the 3210 and 3215 printer keyboards 




JCC, AR 




ENTER for DOC 




ENDSD 


blank 


Terminates execution of SD aids program. 




Valid for 








AR 






M 


EXEC 


r[[PGM=]progname][,REAL.][siZE-size]| 


PGM = progname: 


Valid for 


1 PROC=procname[ov] 


one to eight alphameric characters. Used only if 




JCS and JCC 


the program is in the core image library. 








REAL: the respective program is to be executed in real 








mode. 








SIZE = size: can be the following: 








nK: size of area required 








AUTO: take program size 








(AUTO.nK): take program size plus nK. 








PROC=procname: 








name of cataloged procedure to be retrieved. 








One to eight alphameric characters. 








OV: indicates that overwrite statements follow EXEC 








statement. 


II 


EXTENT 


[symbolic-unit], 


symbolic unit: six alphameric characters 




Valid for 


[serial-number], (type], 


serial number: one to six alphameric characters 




JCS 


[sequence-number], 


type: one numeric character 






[relative-track], 


sequence number: one to three numeric characters 






jnumber-of-tracks], 


relative track: one to five numeric characters 






[split-cylinder-track], 


number of tracks: one to five numeric characters 






[B=bins] 


split cylinder track: one or two numeric characters 






(See Note 1 ) 


bins: one or two numeric characters 




HOLD 


r F1 [,F2][F3][.F4]) 


Used to deactivate a partition. 




Valid for 


\F4[,F3][,F2][,F1]| 






JCC 








IGNORE 


blank 


Ignore abnormal condition. 




Valid for 








AR and JCC 






II 


JOB 


jobname [accounting 


jobname: one to eight alphameric characters 




Valid for 


information] 


accounting 




JCS 




information: one to 16 characters 


II 


LBLTYP 


JTAPE[(nn)]^ 


TAPE: Used when tape files requiring label information 




Valid for 


"INSD (nn) f 


are to be processed and no nonsequential disk files 




JCS 




are to be processed, 
(nn): Optional and is present only for future expansion 

(it is ignored by job control). 
NSD: Nonsequential disk files are to be processed, 
(nn): Largest number of extents per single file . 


["] 


LISTIO 


1 SYS \ 


Causes listing of I/O assignments on SYSLST for JCS and 




Valid for 


j PROG 1 


SYSLOG for JCC. 




JCS 


1 BG / 






JCC 


\ Fn I 


Fn = Physical units assigned to all logical units of 






J ALL I 


foreground partition, n = 1 , 2, 3, or 4. 






\ SYSxxx/ 








J UNITS I 








/ DOWN I 








1 UA 1 








\ X'cuu' ' 
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Name 


Operation 


Operand 


Remarks 




LOG 


blank 


Causes logging of job control statements on SYSLOG. 




Valid for 








JCC 








AR 








MAP 


blank 


Produces (on SYSLOG) storage areas allocated to 




Valid for 




partitions. 




JCC 








AR 








MODE 


/ IR \ 


Changes the mode of operation, changes the EFL 




Valid for 


/ CR _, J 


threshold values, and gives status information. 




AR 


1 CE,cuu 


,l[>x,y] 1 
,D[xx,y] / 
,N J 


*Note: When HIR or ECC is specified, at least one 
of the optional operands must be selected. TH is only 






/ R ) 


valid for the Model 145 when ECC,C is specified with 






] STATUS [ 


the MODE command. 






[ HIR fl,R \ )| 








1 ECC 


~W[ Q |[E=eeee]|]T=tttt]J/ 

.cJ(|,thJ )/ 






MSG 


( BG "J 


Transfer control to an operator communications 




Valid for 


I F1 ( 


routine of a particular partition previously activated 




AR 


I F2 > 

/ F3 1 
V F4 J 


by a STXIT command. 


T"l 


MTC 


opcode, f SYSxxx) [,nn] 
IX'cuu' J 


opcode; BSF, BSR, DSE, ERG, FSF, FSR, REW, 




Valid for 


RUN, or WTM. 




JCS 




SYSxxx: any logical unit. 




JCC 




X'cuu': (Only valid for JCC) c = 0-6, uu = FE (0-254) 

in hex 
nn: decimal number (01-99). 




NEWVOL 


¥\ 


Indicates that a new volume has been mounted for the 




Valid for 


rJ 


specified partition. Fn can be specified as F1, F2, F3, 




AR 




or F4. 




NOLOG 


blank 


Suppresses logging of job control statements and commands 




Valid for 




on SYSLOG, except ALLOC, ALLOCR, DVCDN, DVCUP, 




JCC 




EOJ (/&), EOP (/+), HOLD, JOB, MAP, PAUSE,* and STOP. 




AR 




AR affects all partitions in which NOLOG is issued. 








option: can be any of the following 


a 


OPTION 


option 1 .option 2... J 


LOG Log control statements on SYSLST 




Valid for 


NOLOG Suppress LOG option 




JCS 




DUMP Dump registers and temporary real or virtual 

partition on SYSLST in the case of abnormal 

program end 
NODUMP Suppress DUMP option 
LINK Write output of languageltranslatori on 

SYSLNK for linkage editing 
NOLINK Suppress LINK option 
DECK Output object rhodule on SYSPCH 
NODECK Suppress DECK option 
EDECK Punch source macro definitions on 

SYSPCH 
NOEDECK Suppress EDECK option 
ALIGN Align constants and data areas on boundaries 
NOALIGN Suppress ALIGN option 
LIST Output listing of source module on SYSLST 
NOLIST Suppress LIST option 

LISTX Output listing of object module on SYSLST 
NOLISTX Suppress LISTX option 
SYM Punch symbol deck on SYSPCH 
NOSYM Suppress SYM option 
XREF Output symbolic cross-reference list on 

SYSLST 
NOXREF Suppress XREF option 
ERRS Output listing of all errors in source program 

on SYSLST 
NOERRS Suppress ERRS option 
ACANCEL Cancel job if attempt to assign device is 

unsuccessful 
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Name 


Operation 


Operand 


Remarks 




(OPTION 


:ontinued) 


NOACANCEL Await operator action if a device cannot be 

assigned 
CATAL Catalog program or phase in core image library after 

completion of Linkage Editor run 
STDLABEL Causes all DASD or tape labels to be written on the 

standard label track 
USRLABEL Causes all DASD or tape labels to be written on the 

user label track 
PARSTD Causes all DASD or tape labels to be written on the 

partition standard label track 
48C 48 - character set 
60C 60 - character set 
SYSPARM = 'string' specifies a value for assembler system variable symbol 

and SYSPARM 


M 


OVEND 
Valid for 
JCS, JCC 


[comments] 


Indicates end of overwrite statements for a cataloged procedure. 


l"l 


PAUSE 


comments 


Causes pause immediately after processing this statement. PAUSE statement 




Valid for 


is always printed on SYSLOG. If no 3210, 321 5, or DOC is available, the 




JCS 




statement is ignored. 




PAUSE 


(-') 


Causes pause at end of current job step or at end of job. 




Valid for 


IF4 / 






AR, JCC 


<F3 > [,EOJ 1 
If2 I 














V F1 ) 






PRTY 


[p 1 Pn] 


P = BG, F1, F2, F3, F4. 




Valid for 








AR 




Allows the operator to display or change the priority of partitions. 


M 


RESET 


j SYS ) 


Resets I/O device assignments. 




Valid for 


J PROG J 






JCS 


1 ALL 1 


SYSxxx: SYSIN or SYSOUT cannot be specified. 




JCC 


(sYSxxx) 






ROD 


blank 


Causes all SDR counters for all nonteleprocessing 




Valid for 




devices on the recorder file on SYSREC to be updated 




JCC 




from the SDR counters in storage. 


// 


RSTRT 


SYSxxx, nnnn .filename 


SYSxxx: symbolic unit name device on which the 




Valid for 


checkpoint records are stored. Can be SYSnnn. 




JCS 




nnnn: four character identification of the checkpoint 
record to be used for restarting. 

filename: symbolic name of the DASD file to be used for 
restarting. 




SET 


r,UPSI=nll[,LINECT=n2] 

[,RCLST=n3|[,RCPCH=n4] 

[,RF=n5][DATE = n6] 


Note: The order of the operands is arbitrary. 




Valid for 
JCC 


n1 = 1 to 8 digits of 0, 1, or X. (X = ignore; unspecified 






rightmost positions are assumed to be X.) 






[,HC=n7][,SVA=n8][,SDL=n9] 


n2 = standard number of lines (30-99) for output on each 
page of SYSLST. 

n3 = decimal number (default = 1000) indicating minimum 
number of SYSLST disk records remaining to be 
written before operator warning. 

n4 = decimal number (100-65535) indicating minimum 
number of SYSPCH disk records remaining to be 
written before operator warning. 

c )YES_ 1 defines status of recorder 
~ (CREATE/ file (IJSYSRC) on SYSREC. 














jmm/dd/yyl date defaults to system 
— (dd/mm/yyj generation 








mm: month (01-12) 








dd: day (01-31) 








yy: year (00-99) 
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Operation 



Operand 



(SET continued) 



!YES_ j Hard copy file exists. 

NO \ No recording performed. 

CREATE I Creates a hard copy file. 

n7 defines the status of the hard copy file on the 
Model 125SYSREC. 

n8 = storage size in the format (nK.nK) for SVA and GETVIS 
area, respectively. 

n9 = specify CREATE to have the system directory list (SDL) 
built in the SVA. 



START 
Valid for 
AR 



BG: 



Job control reads next control statement from SYSLOG. 



F1-F4: Specifies that an inactive or stopped foreground partition 
is to be started. (See also BATCH command.) 



STOP 
Valid for 
JCC 



blank 



Indicates that there are no more jobs to be executed in partition 
specified. Not valid in a single partition system. 



TLBL 
Valid for 
JCS 



filename,['file-ID'],[date], 
[file-serial-number], 
[volume-sequence-number], 
[file-sequence-number], 
[generation-number], 
[version-number] 

Note : For ASCI I file processing the 
fourth and fifth operands are called 
set identifier and file section number, 
respectively. 



one to seven alphameric characters, the first of 
which must be alphabetic. 



'file-ID' 
date: 



one to 17 alphameric characters. 

one to six numeric characters (yy/ddd or dddddd). 

file serial number (EBCDIC): one to six alphameric characters) 

set identifier (ASCII): six alphameric characters] 

[volume sequence number (E8CDIC) I one to four 

[file section number (ASCII) j numeric characters 



file sequence number: 

one to four numeric characters. 



generation number: 

one to four numeric characters. 



version number: one to two numeric characters. 



TPLAB 
Valid for 
JCS 



label fields 3-10' 
label fields 3-13' 



'label fields 3-10': Indicated fields of the standard tape file label 
for either EBCDIC or ASCII files. A 49-byte 
character string, contained within apostrophes. 

'label fields 3-13': Same as above, except that character string 
is 69 bytes long, requiring a continuation 
character in column 72 of first line. 

C: Any nonblank character in column 72. 



UCS 

Valid for 
JCC 



SYSxxx,phasenamefFOLD]f,BLOCKJ 
f,NULMSG] 



Causes the 240-character universal character set contained in the 
core image library phase specified by phasename to be loaded as buffer 
storage in the IBM 2821 Control Unit. If SYSxxx is assigned to a 
1403 or 5203 printer, the UCS feature must be present. 



UN BATCH 
Valid for 
JCC 



Terminates foreground processing. 



UPS I 
Valid for 
JCS 



nnnnnnnn 



one to eight characters of 0, 1 , or X. 
Unspecified rightmost positions are 
assumed to be X. 



VOL 
Valid for 
JCS 



SYSxxx, filename 



SYSxxx: symbolic unit name. 



filename: one to seven alphameric characters, the first 
of which must be alphabetic 



Figure 42. Job Control Summary (Part 7 of 8) 
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Name 


Operation 


Operand 


Remarks 


II 


XTENT 
Valid for 
JCS 


type sequence, lower, upper 
'serial no.',SYSxxx[,B 2 1 


type: 1 for data area (no split cylinder) 

2 for overflow area (for indexed sequential file) 
4 for index area (for indexed sequential file) 
128 for data area (split cylinder) 

sequence: sequence number of extent within multiextent 
file. Can be to 255. 

lower: lower limit of extent in the form BiCiC-|C 2 C 2 H-| H 2 H 2 
where: 

B., = for 231 1 or 2314/2319; 0-9 for 2321 
C-,0! = 00 for 231 1 or 2314/2319; 00-19 for 2321 
C 2 C 2 C 2 = 000-199 for 231 1 or 2314/2319, 

000-009 for 2321 
H-, = for 231 1 or 2314/2319; 0-4 for 2321 
H 2 H 2 = 00-09 for 231 1 ; 00-19 for 2321 or 2314/2319. 

Note that the last four strips of subcell 19 are reserved for alternate 
tracks for 2321. 

upper: upper limit of extent in the same form as for lower 
limit. 

'serial no.': 6-alphameric-character volume serial number contained 
within apostrophes. 

SYSxxx: symbolic unit name. 

B 2 : for 231 1 or 2314/231 9; 0-9 for 2321 . 


II 


ZONE 
Valid for 
JCS 


(east) /hh/mm 
(WE ST J 


EAST: A geographical position east of Greenwich. 
WEST: A geographical position west of Greenwich, 
hh: A decimal value in the range 0-12. 
mm: A decimal value in the range 0-59. 


1 + 


Valid for 
JCS 


[comments J 


Indicates end of procedure. 


1* 


Valid for 
JCS 


ignored 


Indicates end of data. 


/& 


Valid for 
JCS 


comments 


Indicates end of job (EOJ). 


* 


Valid for 
JCS 


comments 


Comment card. Column 2 must be blank. 



Figure 42. Job Control Sumrcary (Part 8 of 8) 
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. Name 


Operation 


Operand 


Remarks 




START 
valid for: 
AR 


(BG ) 
)F1 / 
( F2 \ 
)f3 I 
(F4 ) 


BG: Job control reads next control statement from SYSLOG 
F1-F4: Specifies that an inactive or stopped foreground 

partition is to be started. (See also BATCH command) 




STOP 
valid for: 
JCC 


blank 


Indicates that there are no more jobs to be executed in 
partition specified. Not valid in a single partition system. 


II 


TLBL 
valid for: 


filename, ['file-ID'], [datej , 
[file serial number] , [volume 
sequence number] , [generation 
number], [version number] 


filename: one to seven alphameric characters, the first of which 
must be alphabetic 

'file-ID: one to seventeen alphameric characters 




JCS 


Note: For ASCII file processing 
the fourth and fifth operands are 
called set identifier and file 
section number, respectively. 


date 


: one to six numeric characters (yy/ddd or dddddd) 

[file serial number (EBCDIC): one to six alphameric characters] I 

[set identifier (ASCII): six alphameric characters] 1 

[volume sequence number (EBCDIC)] 1 one to four 

[file section number (ASCH)J I numeric characters 








file sequence number: one to four numeric characters 








generation number: one to four numeric characters 








version number: one to two numeric characters 


II 


TPLAB 
valid for: 
JCS 


['label fields 3- 10' j 
('label fields 3- 13' c) 


'label fields 3 - 10': Indicated fields of the standard tape 
file label for either EBCDID or ASCII 
files. A 49-byte character string, 
contained within apostrophes. 

'label fields 3 - 13': Same as above, except that character string 
is 69 bytes long, requiring a continuation 
character in col, 72 of first line. 

C: Any nonblank character in column 72 




UCS 

valid for: 
JCC 


SYSxxx,phasename [,FOLD] 

[.block] [.nulmsg] 


Causes the 240-character universal character set con- 
tained in the core image library phase specified by 
phasename to be loaded as buffer storage in the IBM 
2821 Control Unit. If SYSxxx is assigned to a 1403 or 
5203 printer, the UCS feature must be present. 




UN BATCH 
valid for: 
JCC 


blank 


Terminates foreground processing. 



Figure 42. Job Control Suirirary (Part 8 of 9) 
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Name 


Operation 


Operand 


Remarks 


If 


UPSI 
valid for: 
JCS 


nnnnnnnn 


n: one to eight characters of 0, 1, or X. 
Unspecified rightmost positions are 
assumed to be X. 


II 


VOL 




SYSxxx: symbolic unit name 




valid for: 
JCS 


SYSxxx, filename 


filename: one to seven alphameric characters, the first 
of which must be alphabetic 


II 


XTENT 
valid for: 
JCS 


type sequence, lower, upper 
'serial no.', SYSxxx [,B2] 


type: 1 for data area (no split cylinder) 

2 for overflow area (for indexed sequential file) 
4 for index area (for indexed sequential file) 
128 for data area (split cylinder) 

sequence: sequence number of extent within multiextent 
file. Can be to 255. 

lower: lower limit of extent in the form B.|C.|C.|C 2 C 2 H-H2H 2 
where: 

B 1 = for 231 1 or 2314/2319; - 9 for 2321 

C 1 C 1 =00 for 2311 or 2314/2319; 00 - 19 for 2321 

C 2 C 2 C 2 = 000-199 for 231 1 or 2314/2319, 
000-009 for 2321 

H 1 = for 231 1 or 2314/2319; 0-4 for 2321 

H 2 H 2 = 00-09 for 2311 ; 00-19 for 2321 or 2314/2319, 

Note that the last 4 strips of subcell 19 are reserved for 
alternate tracks for 2321. 

upper: upper limit of extent in the same form as for 
lower limit. 

'serial no.': 6-alphameric-character volume serial 
number contained within apostrophes. 

SYSxxx: symbolic unit name 

B 2 : for 2311 or 2314/2319; - 9 for 2321 


II 


ZONE 
valid for: 


(EAST) /hh/mm 
I WEST) 


EAST: A geographical position east of 
Greenwich. 




JCS 




WEST: A geographical position west of 
Greenwich. 

hh: A decimal value in the range 0-12. 

mm: A decimal value in the range 0-59. 


/ + 


valid for: 
JCS 


[comments] 


Indicates end of procedure. 


r 


valid for: 
JCS 


ignored 


Indicates end of data. 


/& 


valid for: 
JCS 


[comments] 


Indicates end of job (EOJ) 


* 


valid for: 
JCS 


comments 


Comment card. Column 2 must be blank. 



Figure 42. Job Control Suinrary (Part 9 cf 9) 



178 DOS/VS System Control Statements 



APPENDIX B: LINKAGE EDITOR SUMMARY 



FORMAT OF THE ESP CARD 

Card 
Columns 



1 Multiple punch (12-2-9). 

Identifies this as a loader card. 

2 - 4 ESD — External Symbol Dictionary 
card. 

11-12 Number of bytes of information 
contained in this card. 

15 - 16 External symbol identification 
number (ESID) of the first SD f 
PC, CM or ER on this card. 
Relates the SD, PC, CM or ER to a 
particular control secticn. 

17 - 72 Variable information. 

8 positions - Name 

1 position - Type code hex '00', 
'01', '02*, '04*, *05' , or • 0A ' 
to indicate SD, LD, ER, PC, CM, 
or WX, respectively. 

3 positions - Assembled origin 

1 position - Blank 

3 positions - Length, if an 

SD-type, CM-type, or a PC-type. 
If an LD-type, this field 
contains the external symbcl 
identification number (ESID) of 
the SD containing the label. 

73 - 80 May be used by the programmer for 
identification. 



FORMAT OF THE TXT CARD 

Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a loader card. 

2-4 TXT — Text card. 

6-8 Assembled origin (address of 

first byte to be leaded from this 
card) . 

11 - 12 Number of bytes of text to be 
loaded. 

15 - 16 External symbol identification 
number (ESID) of the control 
section (SD or PC) containing the 
text. 



17 - 72 Up to 56 bytes cf text — data or 
instructions tc be leaded. 



73 - 80 May be used for prcgram 
identification . 



FORMAT OF THE RLD CARD 

Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a leader card. 

2-4 RLD — Relocation List Dictionary 
card. 

11 - 12 Number of tytes cf information 
contained in this card. 

17 - 72 Variable information (multiple 
items) . 

a. Two positions - (relocation 
identifier) pointer to the 
ESID number cf the ESD item 
on which the relocation 
factcr cf the contents of the 
address constant is 
dependent. 

t. Two positiens - (position 
identifier) pointer to the 
ESID number cf the ESD item 
on which the pesitien of the 
address constant is 
dependent. 

c. one position - flag 

indicating type cf constant, 
as follows: 



Bits 

0-2 

3 



4-5 



ignored 

- a nenbranch type lead 

constant 

1 - a branch type load 

constant 

00 - load constant length 

= 1 byte 

01 - load constant length 

= 2 bytes 

10 - lead constant length 
= 3 bytes 
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73 - 



11 - load constant length 
= 4 bytes 

6 - relocation factor is 

to be added 

1 - relocation factor is 
to be subtracted 

7 - Next load constant has 

different R and P 
identifiers; therefore, 
both R and P must be 
present. 

1 - Next load constant has 
the same R and P 
identifiers; therefore 
they are both omitted. 

Five significant bits of this 
byte are expanded in the RSERV 
printout. 

d. Three positions - assembled 
origin of load constant. 

8 May be used for program 
identification. 



FORMAT OF THE END CARD 

Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a loader card 

2-4 END 

6-8 Assembled origin of the label 

supplied to the assembler in the 
END card (optional). 

15 - 16 ESID number of the control 

section to which this END card 
refers (only if 6-8 present) . 



17 - 22 Symbolic label supplied to the 
assembler if this label was not 
defined within the assembly. 



29 - 32 Control section length (if net 
specified in last £D or PC) . 

73 - 80 Not used. 



FORMAT OF THE REP (USER REPLACE) CARD 



Card 
Columns 



2-4 



5-6 
7-12 



13 
14 - 16 



17 - 70 



71 - 72 



^'3' - : 

Multiple punch (12-2-9). 
Identifies this as a leader card 

REP — Replace text card. 

Elank. 

Assembled address cf the first 
byte to be replaced 
(hexadecimal). Must be right 
justified with leading zeros if 
needed tc fill the field. 

Elank. 

External symbol identification 
number (ESID) of the ccntrol 
section (SD) ccntaining the text 
(hexadecimal). Must be right 
justified with leading zeros if 
needed tc fill the field. 

From 1 tc 11 4-digit hexadecimal 
fields separated by commas, each 
replacing twe tytes. A blank 
indicates the end cf information 
in this card. 

Elank. 



73 - 80 May be used fcr prcgram 
identification. 
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APPENDIX C: POKER SUMMARY 



Figures 43, 44 , and 45 summarize the 
following statements and commands in 
alphabetical order: 

1. POWER Job Entry Control Language (JECL) 

2. Central Installation Operator Commands 

3. POWER RJE Terminal Commands. 
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r t 

| ID Operation | 

|. 4 

|* $$ DATA | name 



Operand 



■+ 



Remarks 

Specifies the name of the corresponding 

* $$ DATA statement in the SLI book where data 

is tc he inserted. 



H 



* $$ EOJ 



-+ 



(no operand) 



Indicates the end of a job entry. 



* $$ JOB 



[name] , [H] , [priority] 
BGT! 

F4 ["teririd ~| 
F3 J user id I 
F2 LaLLUSERSJ 

IT1. 



Indicates the beginning cf a jcb entry 
and provides jcb entry handling 
information. 

priority = through 9 (9 = highest 

priority 
teririd, userid, ALLUSERS = RJE only 



$$ PRT 



[disposition [class]] 
, [forms-number] 

tnumber-of- copies"] 
devaddr-of-tape J 
, [lines-before-msg] 
, [linetab] 



Provides disposition and handling 

information fcr printed cutput. 

disposition: D = spool to disk 
T = spool to tape 
N = do not intercept 
H = hold until requested 
R = return to terminal. 

class = A through Z. 

forms-number =1-4 alphameric characters 

number-cf-copies = thorugh 99 

devaddr-of-tape = cuu 

lines-before-msg =1-6 digits. 



* $$ PUN 



[disposition [class] ] 
, [card-number] 
, rnumber-of-copiesl 

[devaddr-of-tape J 
, number-of-copies 
f cards-bef ore-msg 



Provides disposition and handling 
information fcr punched cutput. 
disposition and card : see * $$ PRT 
card-number =1-4 alphameric characters 
card-number =1-4 alphameric characters, 
number-cf-copies = through 99 
devaddr-of-tape = cuu 
cards-bef ore-msg =1-6 digits. 



* $$ RDR 



[SYSnnn] , [filename] 
, [vols] , [S] 



Causes a POWER reader routine to insert a 
3540 diskette file into the input being read 
from a card reader. The diskette file can 
contain data and/cr job ccntrcl statements. 



* $$ SLI 



[ sublibrary . ] bookname 



Specifies the book on the source statement 
library to be inserted in the jcb stream. May 
be followed by one or more SLI update cards 
(see belcw) . 



SLI update cards are identified by 

Column 77 : A = insert card after 

B = insert card befor 

D = delete SLI book c 

any other code = repl 

or i 



$SLI in columns 73-76 and are used as follows: 
SII beck card with same sequence number (78-80) 

e SLI book card with same sequence number (78-80) 

ard with same sequence number (78-80). 

ace SLI book card with same sequence number (78-80) 

nsert card in job stream. 



Figure 43. Summary of JECL Statements 
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r T" 

| Operation | 



Operand 



Remarks 



j. + + ., 



A 


j xxyyy.name [number] , priority-n | Alters 


priority of job entry in a 








specified queue tc priority n (n = 








to 9). 




j. _ _ . 


_ j. 






— t — - — - —— — - 


T 








termid | 


| Ercadcast 


B 


|M, 


userid | f 'msg' 
ALLUSERS) 


| M = 


Send a message to a specific user 
or to all terminal users (ALLUSERS) . 






termid [ f nr] 








B 


|L, 


userid [ ,nr] 




1 L = 


Delete messages (s) for a specific 




j )ALLUSERS[,nr] 






user cr all iressages. (nr = 1 to 99) 




1 (all 










j (termid [,nr] ] 


1 D = 


Display messaqe(s) for a specific 


B 


j D, (userid [ ,nr] 1 




teririral user or ALLUSERS. 




| ( ALLUSERS [,nr] 
4. _ _ _ 


j. 


(nr = 1 to 99) 




T 


— T 




C 


| [xxlyyy [ ,, cuu] 


| Cancels 


a reader/writer routine 


C 


| cuu 
. —J.— _ _ _ 


_ x 






T 


T — 


Displays status in specified queue 

of: 

a specific jet entry. 


D 


|xxyyy, / name [, number] \ 






1 1 ALL 1 




ALL jcb entries. 




| \ HOLD / 




all job entries in hold status. 




1 J FREE ( 




all jcb entries not in hold status. 




j \ Pn / 




all jcb entries with priority n. 




1 / RJE \ 




(n = to 9) 




| [ LOCAL 1 




all lecal job entries. 




| \ CLASSz / 




all RJE job entries. 

all jcb entries with class z. 

(z = A to z) 


D 


| A 




active reader, writer, and RJE 
routines. 


D 


|B 




available program and data buffers. 


D 


IC 




free JCT records and track groups. 


D 


|T 




system time and date. 




±_ _ 


j. _ 






T 


T 




E 


| (no-operand) 


| Ends 


POWER system partition. 


E 


|KILL 


| Cancels 


POWER system partition and 
POWER supported partition (s) and 
issues DUMP. 




±_ _ _ _ _ 


_ x 






T 


T 




F 


| [xx] PRT , [cuu] 
| PUN 






F 


| [xx] PRT , [cuu] [,ALL] 
| PUN 


| Flushes 


a writer routine. 


F 


j CUU [, ALL] 








j._ _ _ _ 


_ _L 






T — 


T — — 








|Go 




G 


j [xxlyyy [,cuu] 




Reactives reader/writer routine. 


G 


| cuu 






G 


j XX 




Reactivates 


G 


j RJE , cuu 




Reactivates RJE routine. 






L _ 
















I Holds 


in the specified queue: 


H 


jxxyyy, [ nairet # nuirber] j 




a specific job entry. 




1 ! ALL [ 




ALL job entries. 




1 (p5T J 




all jcb entries with priority n (n = 












to 9). 



L X X - J 



Figure 44. Summary of central Installation Operator Commands (Part 1 cf 3) 
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r t" 

| Operation | 
h +- 

I 
I 
I 
I 



Operand 



U, userid 
T # terniid 

L,cuu 
ALL 



Inquire 



Reirarks 

about RJE status for: 

a specific userid 

a specific terrtiid. 

a specific line. 

ALL valid terminal designations. 



ttt 



DEL 



Job Acc ounting 

only valid if ACCOUNT = YES 

generated. 

Punches ACCTFIL records tc card unit 

cuu and delete ACCTFIL. 

Writes ACCTFIL records to tape unit 

ttt and deletes ACCTFIL. 

Deletes ACCTFIL. 



xxyyy, ( name [ , number] 
ALL 



Deletes froir the specified queue: 
a specific job entry. 
ALL jcb entries. 



[xx] (PRT 
(PUN 
cuu [,nn] 



, [cuu] [,nn] ) 



Multipl e Copy 
Alters/displays copy counter. 

nn = additional copy value 

(1 tc 99) 



4 



name, [number] , 



userid 

ALLUSERS 
LCCAL |~,PRT' 
,PUN 



Changes output destination of a job entry to 



r,PRT1 
[ f PUNj 



a specific user, to a lccal output 
device or to all terminal users on a 
read only basis (ALLUSERS) . 



[xx 
[xx 
cuu 
[xx 
cuu 
RJE 



+- 



]yyy[ ,cuu] 
]yyy, [cuu] ,ECJ 

]yyy, [cuu] , CHECKPOINT 
[, CHECKPOINT] 
, cuu 



a reader/writer routine 
an RJE routine. 



xxyyy, ( name [, number] 
(ALL 
I Pn 



Releases from the specified queue: 
a specific job entry. 
ALL jcb entries. 

all jcb entries with priority n. (n 
tc 9). 



■+- 



[xx]RDR, [cuu] [ ,b] 
[xx]PRT, [cuu] [ ,b] 
[xx]PUN, [cuu] [ ,bp] 
[xx]PUN, [cuu] , [b] 

, RESTART 
[xx]RDR, [cuu] , [b] 

,['file'] , [vols] ,[S] 
[xx]RDR,cuu, [b] ,cuu 



Starts 



i],|"b 1 (ttt ) 
|_bpj jzzzz) 



[xx] (PRT) , [cuu! 

(PUN) 
RJE,cuu(,2770 
,2780 
,3780 
RJE, cuu, (2770) ,2540, cuu 
2780 
3780 



a reader routine. 

a printer routine. 

a punch routine. 

a punch routine from a checkpoint. 

a reader routine for diskette input. 

a reader routine for card 

reader/diskette input. 

a tape writer. 

a class writer. 

an RJE routine. 

an RJE simulator routine. 



Figure 44. Summary of Central Installation Operator Commands (Part 2 of 3) 
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r t- 

| Operation | 



Operand 



Remarks 



[xx]PRT[ ,cuu] 

[xx] PRT, [cuu] , count 

cuut , count] 



Restarts print writer routine. 

+ 1 to +999 J 
count ={-1 to -999) pages 
1 to 999 ) 



TIB[,DFL] [,CFL] 

DUMP, { QFL[,TIE] [,DFL] 

DFL[,QFL] [,TIE] 



TRACE, 



DUMP 



TRACE 



DUMP 



TRACE 



SVC 



TSK[,SVC] 



,LST 



,END 



Trace 

Writes contents of TIB or rronitors queue 
file and data file operations in wrap- 
around buffer. 

SVC or task selection trace. 



Lists status of diagnostic operations 
on SYSLCG. 



Terminates diagnostic operations . 



Legend 

xx = BG, F4, F3, F2, Fl 

yyy = RDR, PRT, or PUN 

cuu = Unit record or RJE physical 

device address 
ttt = tape physical address 

(cuu) 
zzzz = class (es) to be assigned to a 

writer routine (one to four 

alphabetic) 
b = 1 or 2 (number of I/O buffers) 
p = 0,1 or 2 (pause code) 
nr = 1 to 99 (message nurrber) 
name = 1 to 8 alphabetic (job entry 

name 
number= 1 to 5 numeric (job entry 

number) 



• Uppercase letters and punctuation marks 
must be coded as shewn except for 
braces and brackets. 

• Lowercase letters represent variables 
for which specific values must be 
substituted. 

• Items or groups within brackets U are 
optional; use one cr ncne.If one of the 
items is underlined, it is assumed when 
none is ceded. 

• Braces {} group alternative items. 
Choose one or none. None may be choosen 
enly if cne of the grcup is underlined. 
That is the default. 



Figure 44. Summary of Central Installation Operatcr Commands (Part 3 cf 3) 
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| ID | Operation | Operand | Reirarks 

L 4. L L _ 


r T — r — — — — r — — 

|* . . | BRDCSTP | no operand | Requests broadcast messages. 

L _ _J i_ -L 


| * . . | CONTINUE | 
L -4. _ _ i._ 


"begin 

NC 

HCLD 
LOCAL 

PAGE [, count] 
(nc operand) 


| Requests discontinued output 

| from beginning. 

| Deletes output for the job 

| entry. 

| Holds output fcr the jot entry. 

1 Changes destination tc local 

j writer. 

| Pages forward or backward 

| printed output. 

| (+ 1 to + 999 ) 

| count=( - 1 tc - 999} pages 

| ( 1 to 999 J 

| Resumes with interrupted data 

j block. 


|| | | Deletes from the specified 

II 1 | queue: 

|* .. j DELETE | xxyyy, name [ ,numher] | a specific jot entry. 

| | | ALL | ALL job entries. 

L J. i. _ _ _J. _ 


r T — — T T — — 

|* .. | LOGOFF | (nc operand) | Terminates a user session. 

l _4._. j. _ _ _ _ 4. 


r t — — T — t — — — — — 

|* .. | LOGON | userid | Begins a user session. 

L j i. j _ _ _ _ _ 


r — 1 t — — — — 1 

|* ..|MSGR | M f *text' | Sends message tc central 
|j | | operator. 
j. i i -L 


| * . . | OUTPUT | 

L _ J J._ 


"name [ , number] 

ALL 
ALLUSERS 


| Requests cutput of specific jot 

| entry. 

| ALL output fcr userid. 

| All output for ALLUSERS. 


r T — T T 

|* . . | RJEND | (no operand) | Detaches a terminal. 

L J. 4. _ L _ _ 


r T T — t — — — — 

|* . . | RJSTART | termid, [BRDCST], [type],, | Attaches a terminal. 
| | | [bufsize] ,[NOPUNCH] | 
L_ 4 _ 4. j. 


r — T T 

| * . . | STATUS | xxyyy 

L _i_ _ x 


", name [, number ] " 
f ALL 

,HOLD 
,Pn 

. , ALLUSERS 


T 

| Displays status in the 

| specified queue of: 

| a specific job entry. 

| 'ALL* job entries. 

| all job entries in hold status. 

| all job entries with priority n 

| (n= to 9) . 

| all job entries for 'ALLUSERS'. 


| Legend 

|xx = BG, F4 f F3, F2, Fl 
jyyy = RDR, PRT, or PUN 
| name = 1 tc 8 alphabetic (job 
| number = 1 to 5 numeric (job en 

| • Uppercase letters and punct 

j • Lowercase letters represent 

j • Items or groups within brae 
| items is underlined, it is 


entr^ 
try m 

uatioi 

vari< 

kers 
assuiru 


f name) 
Jmber) 

"\ marks m 

ables for 

[] are cp 
2d when n 


ust te c 

which s 

ticnal; 
one is c 


cded as shewn except fcr brackets . 

pecific values must te sutstituted. 

use cne or none. If cne cf the 
oded. 



Figure 45. Summary of RJE Terminal Commands 
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assemble and execute mode 9 8 

assigning priorities 5 9 

assigning storage area 97 

assignment, permanent 2 7 

assignment, temporary 2 7 

ASSGN 

assign logical name command 22 

statement 22 

assumed priority 11 

attaching a terminal 9 

attention routine commands 

ALLOC 19 

ALLOCR 20 

ALTER 21 

EATCH 27 

CANCEL 2 7 

DSPLY 31 

DUMP 31 



END/ENTER,. 32 

ENDSD 32 

IGNORE 37 

LOG 38 

MAP 39 

MODE 40 

MSG 42 

NEWVOL 43 

NCLCG 4 3 

PAUSE 45 

PRT Y 4 6 

START 4 9 

AUTOLINK (automatic library 
look-up) 101 

automatic condense limit 127 
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REP 97 
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communicating with remote 

terminals 72 

communication between central 

installation and terminal 85 

condense 

core image library 126 

procedure library 126 

relocatable library 126 

source statement library 126 

condense limit, automatic 127 

CONDL statement 127 

CONDS statement 

core image library 126 

procedure library 126 



relocatable library 126 

source statement library 126 

console commands, central 
installation 72 

CONTINUE ccmmand 87 

CONTINUE command, options 87 

continue processing 27 

control 

card for running SYSBUFLD 163 

statement format, librarian 119 

control dictionary 97 

control programs 

IPL 11 

jcb control 19 

see IPL 

see jcfc control 

control section origin, relocating 
the 97 

control statement 

conventions 9 

job control format. . . 17 

librarian format 119 

placement, linkage editor 9 8 

control transfer 42 

conventions, control statement 9 

ccpy 

control statements 132 

cere iirage library 133 

counter 79 

counter, alter 79 

counter, display 79 

examples 158-162 

functions 132 

private libraries 134 

procedure library 134 

relocatable library 133 

source statement library 133 

COPYC 133 

ALL statement 133 

COPYI 134 

COPYP 134 

ALL statement 134 

COPYR 133 

ALL statement 133 

COPYS 133 

ALL statement 133 

cere image library 97,116 

condense 126 

ccpy program . 133 

delete 123 
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librarian 129 
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delete command 79 
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display, procedure library 150 

display and punch 

core image library 141 

procedure library 150 

relocatable library 144 

source statement library 146 

displaying the copy counter 79 

displaying job entry status 74 

displaying messages 89 

disposition information 62 
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format 180 

type 97 
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ER 9 8 
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ESE 
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card format 179 

card processed ty MAINT 120 
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ESERV . 14 7 
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MAINT 152 
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executing a program 3 3 

EXTENT statement 34 
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IJSYSPR 137 

IJSYSPS 137 

IJSYSRL 137 
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IJSYSSL . 137 
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